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1. ABSTRACT 


j TCI - TCIi TEST I IS PART 1 OF A FIVE PROGRAM PACKAGE USED TO 

TEST THE TCIi DECTAPE CONTROL. TCI IS A BIT CHECKER PROGRAM 
! THAT CHECKS THAT EACH OF THE CONTROL’S REGISTERS CAN BE 

1 REFERENCED WITHOUT CAUSING BUS ERROR TRAPS, THAT READ-WRITE 

; BITS CAN BE SET AND CLEAR. THAT READ-WRITE BITS ARE CLEARED BY 

RESET INSTRUCTION, AND THAT READ ONLY BITS ARE SET TO THEIR 
j. POWER CLEAR STATE BY RESET INSTRUCTION. 

A SPECIAL ROUTINE (TEST Q) IS AVAILABLE IN THE PROGRAM AS A 
; MAINTENANCE AID IN ADJUSTING THE TCIi CONTROL DELAYS. 

I ALL EXECUTION TIMES QUOTED ARE TYPICAL OF A 11/20 SYSTEM, 

j EXECUTION TIMES IN OTHER PDP-11 SYSTEMS WILL VARY. 

1 2. REQUIREMENTS 

i 

| 2.1 EQUIPMENT 


A. PDP-11 SYSTEM (HK CORE). 

3. ASR33/3S TELETYPE. 

C. TCII DECTAPE CONTROL AND AT LEAST ONE TUSb DUAL TRANSPORT. 

THE .cLETYPE AND TCII CONTROL MUST HAVE THEIR STANDARD PERIPHERAL 
ADDRESSES. INTERRUPT LEVELS, AND INTERRUPT VECTOR ADDRESSES. 

refer to Section 7.2 if yoOr system does not have standard 
PERIPHERAL ADDRESSES. 

STORAGE 


THIS PROGRAM USES LOCATIONS QOQQOO THROUGH CibOOO. 
LOADING PROCEDURE 


THIS PROGRAM’S OBJECT TAPE IS PUNCHED IN ABSOLUTE FORMAT. 
THE ABS LOADER IS USED TO LOAD THE PROGRAM. 


4. USE PROCEDURE 


SECTION 4.1 DESCRIBES USE PROCEDURE FOR RUNNING TCI TEST. 

SECTION 4.2 DESCRIBES USE OF TCII DELAY ADJUSTMENT MAINTENANCE ROUTINE. 





D01 


TCI - TCI 1 TEST i MACY11 27(732) 08-SEP-7S 09:0b PAGE 3 

DZTCAA.Pii 

4.1 - TCI TEST USE PROCEDURE 


A. ALL TRANSPORTS MUST BE OFF 

B. SET WRTM SWITCH AND WALL SWITCH TO OFF POSITION. 

C. LOAO ADDRESS 000200. 

D PRESS START 

E! THE PROGRAM IDENTIFIES ITSELF, TYPES SETUP INSTRUCTIONS, 

SR OPTIONS MESSAGE. AND HALTS. 

F. PERFORM SETUP CSTE^S A AND B). AND SELECT DESIRED SR OPTIONS, 

IF ANY. NORMAL SR SETTING IS SOOOOO. 

THIS PROGRAM’S SR OPTIONS ARE: 

SR15 = I HALT ON ERROR 

SR14 = 1 ENTER SCOPE MODE 

SR13 = 1 INHIBIT ERROR PRINTOUT 

SRI1 = 1 INHIBIT ITERATION 

SR10 = i HALT AT END OF TEST CURRENTLY EXECUTING 

SR9 = i SELECT THE TEST SPECIFIED BY SR7 THROUGH SRO 

SR7 THROUGH SRO - NUMBER OF TEST TO BE SELECTED 

SECTION 7.1 GIVES A COMPLETE EXPLANATION OF SR OPTIONS. 

G. PRESS CONT. THE PROGRAM BEGINS EXECUTION. 

H. AT THE END OF EACH PASS TH- TELETYPE BELL RINGS ONCE, AND ' 

THE CHARACTER IS TYPED. 

I. REFER TO SECTION b.2 IF ERROR PRINTOUTS OCCUR. 

EXECUTION TIME: 

A. ONE NORMAL ERROR FREE PASS TAKES APPROXIMATELY I MINUTE. 

S. ONE SINGLE ITERATION PASS (SR11=1) TAKES ABOUT 13 SECONDS. 

***»*#note****** 

THE SINGLE ITERATION PASS IS A CONVENIENT WAY TO QUICKLY 
DETERMINE IF ANY SOLIO PROBLEMS EXIST. FOR A THOROUGH TEST, 

THE NORMAL ITERATION PASS SHOULD BE RUN. 


4.11 RESTART PROCEDURE 


TO RESTART THE PROGRAM WITHOUT GENERATING THE INITIAL PRINTOUTS 
PROCEED AS FOLLOWS: 

A. LOAD ADDRESS 001000 

B. PERFORM STEP F OF PREVIOUS PROCEDURE. 

C. PRESS START. 

D. GO TO STEP G OF PREVIOUS PROCEDURE. 


I 
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TCI 1 DELAY ADJUSTMENT MAINTENANCE ROUTINE - USE PROCEDURE 


THIS PROGRAM’S TEST 0 IS A SPECIAL MAINTENANCE ROUTINE USED AS AN 
AID IN ADJUSTING THE VARIOUS DELAYS IN THE TC11 CONTROL. 

A SCOPE IS REQUIRED. TO USE PROCEED AS FOLLOWS: 

A. ALL TRANSPORTS MUST BE OFF. WRTMSW -OFF, WALLSW - OFF. 

8. LOAD ADDRESS 001000. 

C. SET 3R9 = 1. AND SR? THROUGH SRO TO 0. PRESS START. 

D. TEST 0 IDENtlFIES ITSELF. REFERS USER TO THIS DOCUMENT. AND HALTS. 

E. THERE ARE TEN DELAYS TO 6e ADJUSTED BY MEANS OF THIS r6uTINE. 

AN 11TH DELAY ADJUSTMENT IS DESCRIBRD UNDER STEP G. 

F. TO ADJUST THE FIRST TEN DELAYS PRESS CONT AND USING THE TABLE BELOW 
DISPLAY AND ADJUST THE POSITIVE PULSE FOR THE TIME SPECIFIED. THE SR 
SETTINGS DESCRIBED APPLY TO A PDPil/20 ONLY. FOR OTHER SYSTEMS 

SET SR TO OBTAIN APPROPRIATE WAVESHAPE. 

************4HHt***************)H»*»************* 

* PIN* * SR SETTING * ADJUST FOR * USING * 

*********************************************** 


D11H2 

* 

070000 

* 

120 MSECS 

* LOWER POT 

DQ5H2 

* 

010000 

* 

10 MSECS 

* LOWER POT 

OilKl 

* 

40 

* 

70 USECS 

* UPPER POT 

DOSKi 

* 

10 

* 

10 USECS 

* UPPER POT 

B10K1 

* 

10 

* 

10 USECS 

* UPPER POT 

AI0F2 

* 

Q 

* 

500 NSECS 

* UPPER POT 

A10T2 

* 

0 

# 

500 NSECS 

* LOWER POT 

D10T2 

* 

0 

* 

500 NSECS 

* LOWER POT 

C04H2 

* 

10 

* 

*1-5 USEC 

* LOWER POT 

C0HK1 

* 

10 

* 

7 USECS 

* UPPER POT 


*********************************************** 

* ADJUST POT FOR MINIMUM TIME. 

TO ADJUST THE 11TH DELAY PROCEED AS FOLLOWS: 

1. SELECT UN I TO /REMOTE/NO TAPE/WRITE ENABLE. 

H. SET WRTM SWITCH TO ON POSITION. 

3. SET CONSOLE HALT SWITCH DOWN. 

4. LOAD ADDRESS OF TCCM. 

5. DEPOSIT NUMBER 000013. 

b. DISREGARD ANY TRANSPORT MOTION. 

7. DISPLAY PIN B10H2, AND ADJUST LOWER POT FOR 8.33 USECS. 
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5. PROGRAM AND/OR OPERATOR ACTION 


5.1 NORMAL HALTS 


LOG 001714 COMMON HALT. THIS HALT IS CONTAINED IN A SUBROUTINE 
THAT IS CALLED BY THOSE PARTS OF THE PROGRAM THAT 
REQUIRE THAT THE PROCESSOR STOP. THIS HALT NORMALLY 
OCCURS UPON COMPLETION OF NON-ERROR PRINTOUTS. 

THE CONSOLE OATA LIGHTS DISPLAY THE ADDRESS OF 
INSTRUCTION THAT GENERATED THE HALT REQUEST. 

LOC 001372 ROUTINE END HALT. THIS HALT OCCURS UPON COMPLETION 
OF THE CURRENT TEST ROUTINE IF SR10 IS SET. THE 
CONSOLE DATA LIGHTS DISPLAY THE NUMBER OF THE TEST 
JUST COMPLETED. 

5.2 NORMAL PRINTOUTS 


ALL NON-ERROR PRINTOUTS ARE NORMAL PRINTOUTS. INSTRUCTION. 
TITLE, AND USER ERROR PRINTOUTS APE NORMAL PRINTOUTS. 

8. ERRORS 


| ERRORS ARE REPORTED IN THIS PROGRAM 9Y THE FOLLOWING METHODS: 

I A. UNCONDITIONAL ERROR HALTS. OR 

t B. ERROR PRINTOUT FOLLOWED B* OPTIONAL ERROR HALT. 

! 8.1 UNCONDITIONAL ERROR HALTS 


AN UNCONDITIONAL ERROR HALT WILL OCCUR AT THE ADDRESSES LISTED 
BELOW IF THROUGH HARDWARE OR SOFTWARE FAILURE. PROGRAM CONTROL 
IS TRANSFERRED TO AN UNEXPECTED AREA BETWEEN 600000 AND 000178. 

300002 RESERVED AREA 

000008 ERROR TRAP 

000012 RESERVED INSTRUCTION TRAP 

000018 DEBUG TRAP 

000022 IOT TRAP 

000028 POWER FAIL TRAP 

000040 THROUGH 000178 - SYSTEM SOFTWARE AND INTERRUPT VECTOR AREA, 
EXCEPT FOR TCI1 AND TTY VECTORS. 

TO FIND OUT WHERE THE PROGRAM WAS AT THE TIME THE FAILURE OCCURRED, 

A. EXAMINE CONTENTS OF REGISTER 6. (ADDRESS 177706). 

B. TRANSFER THE CONTENTS OF REG 6 TO THE SR, LOAD ADDRESS ANO EXAMINE. 

C. THE DATA SHOWN IN THE DATA LIGHTS IS THE VALUE OF THE PC WHEN 
THE FAILURE OCCURRED. 

D. LOCATE IN PROGRAM LISTING THE DISPLAYED PC VALUE. 




MO 



ERROR PRINTOUTS ARE GENERATED BY THE "ERR” SUBROUTINE. THE 
"ERR" SUBROUTINE IS CALLED BY AN "ERROR” STATEMENT IN THE 
PROGRAM LISTING. AN ERROR PRINTOUT LOOKS AS FOLLOWS: 

T XXX PC QYYYYY ICNT 2222. 

WHERE: 

T XXX IS THE NUMBER OF FAILING ROUTINE (OCTAL). 

PC OYYYYY IS THE ADDRESS OF ERROR CALL, 

f ICNT 2222. IS THE ITERATION COUNT AT TIME OF FAILURE. 

I 

I AFTER THE PRINTOUT IS COMPLETED, THE PROGRAM WILL HALT AT 

| COMMON ERROR HALT AT LOC 00172b IF SR15 IS SET. 

I WHEN AN ERROR PRINTOUT OCCURS: 

| A. LOOK UP THE AOORESS REFERENCED BY PC OYYYYY IN THE LISTING. 

: B. OPPOSITE THE PC VALUE AN “ERROR” STATEMENT WILL BE FOUND. AND 

S IN THE COMMENTS SECTION, A DESCRIPTION OF THE ERROR. 

! C. AT THE BEGINNING OF THE TEST ROUTINE A DESCRIPTION OF THE TEST 

1 WILL BE FOUND. 
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7. MISCELLANEOUS 


7.1 SR OPTIONS 


THE STANDARD SR OPTIONS ARE DESCRIBED HERE. 

SR15 HALT ON ERROR. WITH SR15 SET TO A 1, THE PROGRAM WILL 
HALT AFTER AN ERROR OCCURS. PRESSING CONT WILL CAUSE 
PROGRAM TO RESUME OPERATION. 

SR1H SCOPE. THIS OPTION CAUSES THE PROGRAM TO REMAIN IN THE 
CURRENT TEST ROUTINE. WHEN THE OPTION IS REMOVED. THE 
PROGRAM WILL COMPLETE THE CURRENT ROUTINE, AND WILL THEN 
GO ON TO THE NEXT ROUTINE. 

SRI3 INHIBIT ERROR PRINTOUT. THIS OPTION IF SET, WILL REMOVE 
ALL ERROR PRINTOUTS. 

»****NOTE***** 

SCOPE MODE OPERATION IS ACHIEVED BY LOCKING THE 
PROGRAM IN THE CURRENT ROUTINE, INHIBITING ERROR 
PRINTOUTS, AND BYPASSING ERROR HALTS. 

SRli INHIBIT ITERATION. SETTING THIS OPTION WILL CAUSE THE 
PROGRAM TO EXECUTE EACH TEST ONLY ONCE. INSTEAD OF THE 
NORMAL NUMBER OF ITERATIONS SELECTED F6R EACH TEST. 

TWO POSSIBLE USES OF THIS OPTION ARE: 

A. QUICK PASS. EACH TEST IS RUN ONLY ONCE. 

B. TO SKIP OVER A FAILING ROUTINE. 

SR1Q HALT AT END OF CURRENT ROUTINE. WITH THE OPTION SET. 

THE PROGRAM WILL .HALT AT THE END OF EACH TEST, AND &ISPLAY 
IN DATA LIGHTS THE NUMBER OF THE TEST JUST COMPLETED. 

THREE POSSIBLE USES OF THIS OPTION ARE: 

A. TO STEP THROUGH THE PROGRAM ONE ROUTINE AT A TIME. 

B. WHEN THE PROGRAM HAS BEEN RUNNING FOR A WHILE, TO 
FIND OUT HOW FAR IT HAS PROGRESSED. 

C. IN CASE OF A BLOW UP. ETC., TO STEP THROUGH ONE TEST 
AT A TIME UNTIL THE £AILUR£ REOCCURS. THE ROUTINE 
FOLLOWING THE PREVIOUSLY COMPLETED ROUTINE WOULD BE 
1\€ FAILING ROUTINE. 

SR9 SELECT ROUTINE. WITH SR9 SET. THE PROGRAM WILL GO AND 
EXECUTE THE ROUTINE INOICATE& BY SR7 THROUGH SRO. AFTER 
THE CURRENT ROUTINE HAS BEEN COMPLETED. IF THE OPTION 
IS REMOVED. THE PROGRAM WILL PROCEED TO EXECUTE THE 
ROUTINES F6LLOWING THE SELECTED ROUTINE. 
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7.2 TESTING TC11 AT NON-STANDHRO AODRESSES AND/OR VECTORS 


THIS PROGRAM CAN TEST THE TC11 AT NON-STANDARD ADDRESSES AND 

VECTORS PROVIDED THOSE ADDRESSES AND VECTORS ARE PROVIDED TO 

THE PROGRAM AS FOLLOWS: 

A. AFTER LOAOING PROGRAM REFER TO PROGRAM LISTING AND CHANGE 
LOCATIONS 001004 THROUGH 001020 TO REFLECT THE NEW TC11 
ADDRESSES AND VECTORS. 

B. IF THE TELETYPE IS ALSO AT NON STANDARD ADDRESSES, CHANGE 
LOCATIONS 001022 AND 001024 ALSO. 

C. PROCEED TO USE THE PROGRAM, OR 

D. USING STANDARD DUMP ROUTINES. DUMP OUT THE ENTIRE PROGRAM 
IN ABSOLUTE FORMAT TO HAVE Aft OBJECT TAPE THAT REFLECTS 
YOUR SYSTEM, OR 

E. DUMf OUT ONLY LOCATIONS 001004 THROUGH 001024 IN ABSOLUTE 
FORMAT, ANO LOAD IT ALSO AFTER LOADING THE MAIN PROGRAM. 


8. DESCRIPTION 


THIS PROGRAM IS ORGANIZED INTO THREE MAIN SECTIONS: 

A. CONTROL ROUTirC, 

B. TEST ROUTINES. 

C. COMMON SUBROUTINES 

8. 1 CONTROL ROUTINE 


THE CONTROL ROUTINE ASSUMES CONTROL WHEN THE PROGRAM IS STARTED. 
IT HAS THE FOLLOWING FUNCTIONS: 

A. CONTROLS SEQUENCE OF TEST ROUTINES. 

B. HONORS AND ACTS ON SR OPTIONS. 

THE CONTROL ROUTINE IS CALLED FROM A TEST ROUTINE BY THE 
"SCOPE" STATEMENT. 
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TEST ROUTINES 


THE ACTUAL TESTING IS PERFORMED BY A SET OF TEST ROUTINES THAT 
ARE NUM8E&E0 SEQUENTIALLY FROM 0 TO 225 (OCTAL). EACH TEST 
ROUTINE IS PRECEDED BY A TEST HEADER THAT IS USED BY THE CONTROL 
ROUTINE IN ORDER TO PROPERLY SEQUENCE THROUGH THE TESTS. THE HEADER 
LOOKS AS FOLLOWS: (EXAMPLE) 

*************************************************************** 
T20: 20 {ROUTINE NUMBER 20. * 

T21 {ADDRESS OF NEXT ROUTINE * 

100. Itest iteration COUNT * 

BAGA {SCOPE ENTRY POINT * 

THE FIRST 2 ITEMS ARE SELF EXPLANATORY. THE TEST ITERATION COUNT 
INDICATES TO THE CONTROL ROUTINE THE NUMBER OF TIMES THE TEST 
SHOULD BE PERFORMED BEFORE GOING ON TO THE NEXT ROUTINE. 

THE SCOPE ENTRY POINT INDICATES TO THE CONTROL ROUTINE THE ADDRESS 
IT SHOULD RETURN TO AFTER THE FIRST ITERATION. THE ADDRESS MAY 
NOT NECCESARILY POINT TO THE FIRST INSTRUCTION OF THE TEST. 

COMMON SUBROUTINES 


ALL SUBROUTINES NEEDED BY EITHER THE CONTROL ROUTINE OR TEST 
ROUTINES ARE GROUPED TOGETHER. THE MOST SIGNIFICANT SUBROUTINE 
IS THE "ERR" SUBROUTINE, WHICH IS CALLED BY AN "ERROR" STATEMENT 
AND TYPES THE TEST NUMBER AND PC VALUE WHEN A FAILURE OCCURS. 
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429 



• 

% 

.LIST BIN. SEQ.LD.ME 


430 




.NLIST MC,ftO 


431 




. A8S 


433 



% 



434 






435 


000G00 


.=0 


435 

300000 

000002 


. •*•2 

; UNASSIGNED TRAP 

437 

000002 

000000 


HALT 

; 438 

000004 

300008 

MACHER: 

>2 

;SP OVERFLOW, BUS ERROR TRAP 

438 

000008 

000000 


HALT 

440 

000010 

000012 


. +2 

; RESERVED INSTRUCTION TRAP 

441 

000012 

000000 


HALT 

; TRACE TRAP 

44? 

000014 

000018 


. +2 

443 

000018 

000000 


HALT 

; TRAP TO CALL IOX 

444 

000020 

000022 


. +2 

f 445 

000022 

000000 


HALT 

; POWER FAIL TRAP 

448 

000024 

G0QQ28 


. +2 

447 

000028 

OOOOOO 


HALT 

;EMT TRAP 

44S 

000030 

001510 

EMTV: 

EfITINT 

f '-49 

000032 

300340 


PRTY7 


1 ■ sO 

000034 

000038 

TRPV: 

. +2 

;TRAP TRAP. SIMILAR TO EMT. 

i 451 

000038 

000000 


HALT 


I 452 


;10C 40 

THROUGH 376 FILLED WITH 

.+2 AND HALT. 

1 453 



.LIST 


494 



; EQUATE 

STATEMENTS 


455 


177570 


SR=1?7570 


458 


1 / 1 ' 1 5 


CC=1 77776 


457 


177778 


FSU= 177776 


458 


00 1030 


?P90T=1000 


459 


Q002*G 


NO? =240 


480 


OOOOOC 


0PEN=0 


i 481 


10G0CC 


(1ANUAL=BIT1S 



10CGG0 

Q4CCCC 

r Dnnno 

vnh. wgwv 

C1GCCC 

004000 

CG2CCC 


317:5=100000 

31714=40000 

31713=20000 

81112=10000 

81711=4000 

81110=2000 


468 

CGI COG 

£179=1000 

469 

Q0C4GG 

8178=400 

47C 

0CG20G 

8177=200 

471 

0GC1GC 1 

8176=100 

472 

CGJX4C 

6175=40 

473 

0GCG2G 

£114=20 

*74 

000010 

81T3=10 

475 

000004 

8 IT 2 =H 

* r 6 

QGQG02 

3111=2 

*1/ / 

OuQCOi 

3170=1 

*78 

OC 0000 

RO=XO 


oooeoi 

Rl=‘/i 

430 

000002 

R2=7.2 

481 

000003 

R3=X3 

482 

000004 

R4=*/.4 
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U S3 


r|Of|f|Acr 


R5= v .5 

*-$'4 


000008 


R6=* / .6 

485 


000007 


R7=%? 

4S8 


003037 


PC=%7 

487 


305^25 


P0PSP=572b 

4S3 


022828 


P0PSP2=022626 

439 


000340 


PRTY7=340 

490 


003303 


PRTY8=300 

491 


000240 


FRTY5=240 

492 


000200 - . 


PRTY4=200 

493 


000140 


PRTY3=140 



300100 


PRTY2=100 

495 


330040 


PRTY1=40 

4% 


000000 


PRTYOrO 

497 


000007 


BELL=007 

49S 


17777? 


TLAST=-1 

499 


X / / i i / 


X=-l 

500 


020000 


MAINT=BIT13 

501 


000002 


RNUM=BIT1 

502' 


000001 


DO=BITQ 

503' 


00*0030 


EMTX=0 

504 


030200 


.=200 

505 

000200 

00016? 000724 


JMP START 

505 


001300 


.=1000 

507 

Q01C00 

03016? 000154 


JMP GETRDY 

508 

001004 

177340 

TC5T: 

177340 

509 

001008 

177342 

TCCM; 

177342 

510 

001010 

177344 

TCWC: 

177344 

511 

no i n o 

WC —w * w 

177346 

T3BA: 

177348 

512 

0010 1H 

177353 

TOOT: 

177350 

513 

C01018 

000214 

TCVTR: 

214 

514 

001020 

C0G300 

TCLVL: 

PRTY8 

515 

001022 

177584 

TPS: 

177584 

518 

00132*4 

177588 

IPS: 

177588 

517 

CO 1028 

0C300G 

ICTR: 

OPEN 

516 

001G3C 

cccceo 

imi 

OPEN 

519 

no 

0035 14 

KSTART: 

TO 

con 

00 1034 

ocrcoc 

SCOPTR: 

QPFN 

521 

001038 

GOOOCO 

RTNNO: 

OPEN 

522 

001040 

G0XX 

NX TST: 

OPEN 

523 

nn’rmp 

000X0 

CURTST: 

OPEN 

524 

001044 

oxxc 

RCNT: 

OPEN 

ocb 

X1048 

oxocc 

CR3UF: 

(FEN 

528 

CO 1050 

GOCCX 

CR8UFA: 

OPEN 

527 

nmns2 

OQOGX 

CARMSK: 

OPEN 

528 

001054 

oocooc 

ERCTR: 

OPEN 

529 

XI0S8 

000003 

CTRA: 

OPEN 

530 

OOlCtoO 

exox 

CTRB: 

OPEN 

531 

001CE2 

OOOQGO 

CTRC: 

OPEN 

COO 

001084 

XXCG 

CTRD: 

(FEN 

533 

001088 

XXCO 

PRVCNT: 

OPEN 

534 

001070 

xoxo 

RNONMB; 

OPEN 

ip** 1 **%f** r 

o35 

0C1072 

XOOOO 

TEMP: 

OPEN 

538 

001074 


EMTTAB: 



537 001074 002222 

539 


L 


.WORD TYP 
.LIST 


L01 

n 


; POP THE STACK. SAME AS TST (6)+ 

;POP STACK TWICE. SAME AS CMP (b)+,(8)+ 
; PRIORITY LEVEL DEFINITIONS 


; GO TO START OF PROGRAM. 


; TC11 STATUS REGISTER. 

; TCI 1 COMMAND REGISTER. 

; TC1I WORD COUNT REGISTER. 

;Kll BUS ADDRESS REGISTER. 

;TC11 DATA REGISTER. 

;TC11 INTERRUPT VECTOR 

;TC11 INTERRUPT PRIORITY LEVEL. 

!lsp CSR 
. lsp BUFFER 

■ CONTAINS CURRENT ITERATION COUNT 
; CONTAINS ACCUMULATED ITERATION COUNT. 
; CONTAINS STARTING ROUTINE ADDR. 

; CONTAINS CURRENT SCOPE POINTER. 


; POINTER FOR EMT CALL TYPE 
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539 

001076 

002340 




.WORD 

TYPS 

; POINTER FOR EMT CALL TYPES 

540 






.l T ST 



^4 1 

001100 

002436 




.WORD 

STAL 

; POINTER FOR EMT CALL STALL 

543 






.LIST 



543 

001102 

001774 




.WORD 

ERR 

; POINTER FOR EMT CALL ERROR 

544 






.LIST 



545 

001104 

001732 




.WORD 

DTCHK 

; POINTER FOR EMT CALL DATCHK 

546 






.list 



" 547 

031106 

001706 




.WORD 

CHLT 

; POINTER FOR EMT CALL CHALT 

548 






.LIST 



2Jl|€j 

001110 

001630 




.WORD 

STTCV 

; POINTER FOR EMT CALL STC11V 

550 






.LIST 



551 

001112 

001720 




.WORD 

EHLT 

; POINTER FOR EMT CALL EHALT 

552 






.LIST 



553 

001114 

00 I860 




.WORD 

SRSETT 

; POINTER FOR EMT CALL SRE5ET 

554 






.list 



555 

001116 

001272 




.WORD 

CHAINN 

; POINTER FOR EMT CALL SCOPE 

555 






.LIST 



, 557 

001120 

001530 




.WORD 

SAVRG 

; POINTER FOR EMT CALL SAVREG 

• 558 






.LIST 



559 

001122 

001570 




.WORD 

RSTRG 

; POINTER FOR EMT CALL RSTREG 

580 






.LIST 



581 

001124 

0020 16 




.WORD 

ERRI 

; POINTER FOR EMT CALL ERROR! 

562 






.LIST 



563 

001126 

002372 




.WORD 

DLY 

; POINTER FOR EMT CALL DELAY 

564 






.LIST 



565 

QQ1I30 

012706 

CQ100G 


START: 

MOV 

#SP80T//.& 

;5£T BOTTOM OF SP STACK. 

566 

001134 

012767 

000340 

176634 


MOV 

#PRTY7 PSW 

; SET PRIORITY 7. 

567 

001142 

012767 

000006 

176634 


MOV 

#6 , MACHER 


568 

001150 

104000 




TYPE 


; TYPE TITLE AND INSTRUCTIONS. 

569 

001152 

003314 




POTIT 



570 

001154 

004767 

000516 


SRSET : 

JSR 

X7 SETSR 

; SET SR OPTIONS DESIRED 

571 

001160 

016767 

177646 

177652 

GETROY: 

MOV 

KStART.NXTST 

;ADDR OF 1ST ROUTINE TO NXT5T 

572 

001166 

012767 

000006 

176610 

GTR0YX: 

MOV 

#6 .MACHER 

; RESET MACHER TRAP. 

573 

001174 

012767 

000340 

176574 


MOV 

«pAty7,psw 

; SET PRIORITY 7. 

574 

001202 

012706 

001000 



MOV 

#5P80T,R6 

; SET BOTTOM OF STACK. 

575 

00)206 

104010 




SRESET 


; ISSUE RESET. 

576 

001210 

004767 

000226 


GTROYA: 

JSR 

R7.F0RW0 

ROLL FORWARD TO "NEXT” ROUTINE. 

577 

001214 

032767 

001000 

176346 

GTRDYB: 

SIT 

#8179. SR 

; CHECK SELECT ROUTINE SWITCH 

578 

001222 

001002 




BNE 

GTRDYC 

; BRANCH IF SELECT ROUTINE SWITCH IS SET. 

579 

CO 1224 

000177 

177612 



JMP 

3CURTST 

;GQ RUN CURRENT ROUTINE. 

580 

001230 

016700 

176334 


GTRDYC: 

MOV 

SR.RO 

(SR) TO RO 

581 

00X234 

042700 

177400 



SIC 

#1 77400 .RO 

;MASK UNOESIRED BITS 

582 

001240 

126700 

177572 



CMPB 

RTNNO.Rft 

; COMPARE RTNNO TO (RQ) 

583 

00X244 

001002 




SN£ 

gtroy6 

; BRANCH IF ROUTINE NOT FOUND YET. 

584 

001246 

000177 

177570 



IMP 

3CURTST 

;G0 RUN ROUTINE. 

585 

001252 

022767 

177777 

177560 

GTRDYD: 

CMP 

#-l.NXTST 

; NO. CHECK FOR LAST ROUTINE. 

586 

001260 

001353 




8 f€ 

gtr6ya 

BRANCH IF NOT LAST ROUTINE. 

587 

001262 

104000 




TYPE 


;TYPE INCORRECT RTN SELECTED. 

588 

001264 

003271 




AINCRT 



589 

001266 

104005 




CHALT 


; COMMON HALT. 

590 

001270 

000733 




BR 

GETROY 

; START OVER. 

591 

001272 

016667 

000002 

177476 

CHAINN: 

MOV 

2(6) ,776 

f 

592 

001300 

016767 

177530 

177466 


MOV 

SCOPtR.774 

• 

f 

593 

001306 

012706 

000774 



MOV 

#774 ,R& 

f 

594 

001312 

005267 

177512 



INC 

ICNT 

; INCREMENT ICNT. 


N01 


TCI - 

rc.l ’’EOT 

* 

MACY11 

27(732) 
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oztcaa.p.; 






1 
i , 

GO 13. 5 

in 2 



3: i£ 

CHNAC 

s% 

301320 

305.37 

177504 


COM 

ICNT 

sr 

001324 

332757 

040000 

175235 

CHNAC: BIT 

*BIT14,SR 

998 

001332 

001401 



3EQ 

CHNA 

599 

001334 

000002 



CHNAB: RTI 


500 

001338 

032767 

004000 

175224 

CHNA: BIT 

*b:th,sr 

501 

301344 

30*003 



3NC 

CHNAA 

502 

001345 

005357 

177454 


DEC 

ICTR 

503 

001352 

001370 



BNE 

CHNAB 

504 

301354 

3 5 2825 



CHNAA: P0PSP2 


505 

001358 

032767 

002000 

175204 

BIT 

#BIT10,5R 

508 

001354 

30 1403 



3EQ 

CHNB 

507 

001355 

Q167Q0 

177444 


40V 

RTNNO.RO 

508 

001372 

Q n OQ0G 



HALT 


509 

001374 

0327&7 

001000 

175155 

CHNB; BIT 

191 T9, SR 

513 

001402 

001268 



3NE 

GETRD* 

511 

00140* 

022767 

177777 

177425 

440 

#-l .NXTST 

5.2 

m imp 

301265 



8NE 

gts6yx 

5 13 

001414 

a 04003 



TYPE 


514 

D0i4!5 

0033 10 



HPGEND 


r ;'#**** 

o.o 

001420 

013700 

00004? 


MOV 

2142, RO 

515 

001424 

00 1 405 



3E0 

HERE 

f ! -f 

o./ 

001428 

000005 



RESET 


5.3 

001430 

004710 



LOGIC: J3R 

PC. CO *. 

519 

001432 

000240 

000240 

000240 

.WORD 

NO^. NOP. NOP 

520 

001440 

000647 



HERE: 3R 

getAdy 

521 

00144? 

0167Q5 

177372 


F0R«: MOV 

NXTST.R5 

522 

001448 

01256/ 

1773b 4 


MOV 

(5)+,RTNN0 

523 

001452 

012567 

17735? 


MOV 

(5)+, NXTST 

524 

001458 ‘ 

012567 

177344 


MOV 

'5)+, ICTR 

525 

001452 

312567 

1773% 


MOV 

(5)4,SC0PTR 

525 

001455 

010557 

177350 


FORMDA: MOV 

rs.cDrtst 

527 

001472 

012787 

oonoi 

177330 

MOV 

#1, ICNT 

528 

001500 

016767 

17/332 

175062 

MOV 

RTltoO.SR 

529 

001 505 

000207 



K i 3 

R7 

530 

001510 

010045 



EMTINT: MOV 

R0.-C6) 

531 

001512 

016830 

000002 


MOV 

2(5), RO 

532 

301515 

0**000 



MOV 

-(0),R0 

533 

001520 

008300 



A5L 

RO 

534 

001522 

315000 

171074 


MOV 

EMTTA3-10000(0) 

835 

001528 

OO02OO 



F.TS 

RO 

535 





:SAVE REGS 0 TO 4 SUBROUTINE. 

537 

001530 

012567 

000030 


SAVRG: MOV 

(5)4, SVRPC 

538 

001534 

012657 

000025 


MOV 

(6)4 5VAPSW 

539 

001540 

010446 



MOV 

X4,-tb) 

5*0 

001542 

0103% 



MOV 

73, -(b) 

541 

001544 

310245 



MOV 

7.2. -(6) 

542 

001545 

010146 

♦ 


MOV 

71, -(5) 

847 

001550 

01OC45 



MOV 

70. -(6) 

5** 

001552 

016746 

000010 


MOV 

SV&>SW,-(6) 

' 8*5 

001558 

015745 

000002 


MOV 

SVRPC, -(6) 

545 

001582 

000002 



RTI 


847 

001554 

0O00OO 



SVRPC: OPEN 


848 

001585 

OG0OC0 



SVRPSW: OPEN 


049 





: RESTORE REGS 0 

TO 4 SUBROUTINE 

850 

C01570 

012557 

000030 


ftSTRG: MOV 

(6)4, RSTPC 


i 


BR IF RESULT NOT 0. 

RESET ICNT TO -1. 

CHECK FOR SCOPE OPTION. 

BRANCH IF SCOPE SU NOT SE T . 

RETURN TO ROUTINE. 

TEST INHIBIT ITERATION SWITCH 
BRANCH IF INHIBIT ITERATION SW SET 
DECREMENT ITERATION COUNT. 

BRANCH IF COUNT NOT 0. 

POP STACK TWICE 

ROUTINE END HALT SW SET 7 (SR10) 
BRANCH IF NOT SET. 

TEST i TO RO. 

ROUTINE END HALT. TEST I IN LIGHTS. 
CHECK SELECT ROUTINE SWITCH 
BRANCH IF SELECT RTN SW SET 
LAST TEST 7 

BRANCH IF NOT LAST TEST. 

TYPE PROGRAM END BELL. 

GET CONTENTS OF 42. 

'BR IF 0 

! NON-ZERO, ISSUE RESET. 

RETURN TO MONITOR. 

GO REPEAT PROGRAM. 

AOOR OF NEXT ROUTINE TO R5. 

GET NEXT ROUTINE NUMBER. 

GET ADDR NEXT "NEXT" ROUTINE. 

GET ITERATION COUNT. 

GET SCOPE LOOP ENTRY POINTER. 

ADDR OF NOW CURRENT TEST TO CURTST. 
PRESET ICNT TO 1. 

DISPLAY ROUTINE ». 

EXIT FORWO SUBROUTINE. 

PUSH RO. 

GET EMT PC. 

GET EMT CALL. 

TIMES 2. 

.0 :FORM EMT AODR. 

;G0 TO EMT RTN. RESTORE RO. 

SAVE PC AND PSW. 

SAVE REGS 0-4 
IN STACK. 


RESTORE PC AND PSW. 
EXIT. 


SAVE PC AND PSW. 


,-r-, ,r- 

S; 






B02 


" 1 """ 111 1 1 

l 

|| ^ > % 41 

| U4 - i 

‘Cl. 'EST 

i 

7* AC v 1 1 

c7i?321 
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ddtcaa. 

i 

Pi: 








5S1 

33 157' 4 

J " Z'St”* 

333025 


1 JV 

; 5 '♦.RSTPSU 



553 

4 *b3'3 

312&03 



MOV 

C 6 J+.X 0 

•.RESTORE REGS C - 4 


dS3 

331503 

3*2531 



MOV 

v 5 )♦, 71 

; r RON STACK. 


a ?* 4 

331534 

012532 



40V 

ibu .%2 



5 >* SW**Pfc 

$ 033 

331535 

312533 



MOV 

* b ) 4 t x 3 



bob 

331513 

312534 



NOV 

» 5 1 ♦ .74 



33- 

001512 

315745 

000310 


40V 

RSTP 5 U, -(b) 

.-RESTORE FC AND PSW. 


33 9 

001515 

315745 

000002 


NOV 

RSTPC.-( 6 ) 



j b59 

•VV h 33 

M-’W 

Hi1W3 

«J w W *m* Mu 



RTI 


; EXIT 


333 

331534 

033333 



RSTPC: OPEN 




| 33. 

331535 

303333 



RSTPSU: OPEN 




332 





jROUTINE TO SET 

TCI 1 INTERRUPT VECTOR AND PRIORITY 


J bb3 

331530 

31 ”557 

QQQQGC 

000012 

STTCV: 40V 

a(b),STPRA+2 

;NOVE VECTOR AOOR TO STPRA+2 


33 H 

301535 

352715 

CXJ0002 


ADO 

* 2 , dih 

.-SET UP EXIT 


335 

301542 

#4 'I .f ®4UP\ ♦ 

J * b < lU 

177150 


40V 

TcCTR.Xl 



1 «T * f 

S DOC* 

331545 

■w ■* 4 mm. ^ : lk*» *#*. 

000003 


5TPRA: 40V 

•OPEN, UH 

;S£T VECTOR ADDRESS 


33 ~ 

001853 

,rv 

1771H2 


40V 

TCLVL.UH 

;S£T PRIORITY 


553 

D 0 is;Sh 

300032 



RTI 


; Exit 


'559 





: ROUTINE to ISSUE RESET. 



870 

001550 

012730 

052525 


SRSETT: 40V 

*52525,70 

;OATA TO R3. 


1 iT*l 

■301554 

305130 



CON 

•/.a 

; CONPlENENT <R0). 


1 s""- 

30*555 

0 1 one 7 

li # ;' * u 


4~" 

X0,SRSETT+2 

;(R0) TO SRSETT+2. 


| 6T3 

1X31872 

DQ30OS 



4ESET 


; ISSUE RESET. £RQ) IS 


! 6 "N 

001574 

300002 



ATI 


; DISPLAYED. EXIT. 


3 ' 3 

001575 

134333 



SETSR: T Y?E 


;TYPE SELECT OPTION NESSAGE. 


3 ""5 

301730 

303233 



A5ETSR 




1 ir"* 

001702 

134*005 



C4ALT 


; CONNON HALT. 


5~3 

, C •~* r v 

000337 



R T S 

7.7 

;EXIT. 


5"*9 





-.CONNON MALI ROUTINE 



t 593 

001705 

311500 



CHIT: NOV 

376, 70 

; DEVELOP ADDRESS OF CALLER. 


|[ ILp ¥ 

I %0*W> 4k 

* * 4 w» 

1&2700 

003002 


sua 

• 2,*0 



t 8 S 2 

001714 

0O30X 



4 alt 


;HALT. AOORESS OF CALL INSTRUCTION 


1 583 

001715 

G3OQ02 



rti 

* 

; IN DATA LIGHTS. 


j 594 





: CONDITIONAL ERROR HALT ROUTINE. 


I 

| 5SS 

031720 

0CS757 

175644 


tHLT: TST 

SR 

.CHECK FOR HALT ON ERROR. 


i 535 

.•v" raw 

yw' <a» * *■»>. » 

130001 



3P_ 

EHLTA 

; BRANCH IF NO HALT DESIRED. 


: 58 r* 

^ ** 

■W'MM» J* * # %^W 

* , yvv\'Y'} 



HAi_T 


;HAlT. 


i 535 

001730 

*V«VP 



EHLTA: RTI 


; IN DATA LIGHTS. 


; 568 





:DATA CHECK ROUTINE. 



1 590 

*iv 4 / 4?4mT 

32575'' 

177110 

177110 

OTCHK: CNP 

CRBUF.CR9UPA 

; COMPARE EXPECTED AND RECEIVED 


; 551 

00174*0 

-v, ‘ * 4 < k* 



8 EQ 

otchkA 

; CHARS. BRANCH ir SAME. 


! 882 

031742 

309057 

000714 


JSR 

75.0ACNV 

; GO TO OCTAL TO ASCII CONVERT. 


583 

0G1745 

001 0^5 



CRBUF 


•.SOURCE ADDR. 


* 894 

031750 

I3G3175 



A AS 


; DESTINATION AODR. 


. 595 

031752 

300033 



3 


;«0F DIGITS TO CONVERT. 


- 595 

001754 

304557 

000702 


JSR 

7S.0ACNV 

: GO TO OCTAL TO ASCII CONVERT. 

| 

i 597 

001750 

0C105C 



CRBUFA 


; SOURCE ADDR. 

| 

: 5% 

201 >'52 

003150 



AASB 


DESTINATION AOOR. 

j 

599 

001784 

000003 



3 


;«0F DIGITS TO CONVERT. 

I 

! 7CC 

001755 

104014 



ERROR 1 



f 

! 701 

001770 

003137 



EROAT 



| 

t a>^,M 

( / uc 

CO 1772 

C0C002 



CTCHKA: RTI 


; EXIT. 

j 

! 703 

001774 

012757 

177777 

000126 

ERR: NOV 

•- 1 .ERRB 

;SET UP ONE ME55AGE CALL. 

1 

} 704 

C02002 

012757 

000240 

000122 

NOV 

•24fi,ERR842 


I 

| 705 

COHO 10 

0C5057 

000132 


CLR 

ERRE 

•* 


s 705 

i 

j 

0020 14 

CGC413 



BR 

ERRA 











| 



cos 


TCI - TCii TEST 

1 

flACVl l 
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"O' 

0020 lo 

^ 1 1 

W4 «i W W - 

000 108 


ERRi: 

MOV 

3X6.ERR8 

; DEVELOP ADDT’L MESSAGE ADDR. 

"33 

nnarpa 

ul . . b. 

00Q1Q2 

000100 


MOV 

3ERftB.ERRB 

; STORE AT ERRB. 

70S 

002030 

U 1 C ' O t 

177777 

000074 


MOV 

i-l.EftRB+2 


710 

002038 

012m" 

000002 

000102 


MOV 

•2.£rre 


711 

002044 

032757 

020000 

175516 

ERRA: 

SIT 

#8iT13,SR 

; INHIBIT ERROR PRINT 7 

* * 4*. 

002052 

GO 1030 




BNE 

ERRC 

; BRANCH TO INHIBIT PRINT. 

713 

002054 

01 1887 

000064 



MOV 

3X6.ERRD 

; DEVELOP CALLING AODR. 

714 

002080 

18278" 

000002 

000056 


sua 

*2,tRRD 


«"% f SO**. 

♦ -3 

002085 

33458" 

000570 



JSR 

R5.0ACNV 

{CONVERT TEST * TO ASCII. 

"l5 

002Q"2 

301335 




RTNNQ 



"17 

0020m 

303132 




A THUMB 



-* ■■ o 
* * 0 

0020m 

333033 




3 



";9 

032100 

omsb" 

000556 



JSR 

y.s , OACNV 

; GO TO OCTAL TO ASCII CONVERT. 

TOO 

002104 

302144 




ERRO 


; SOURCE ADDR. 

721 

202108 

3031 12 




APC 


{DESTINATION AODR. 

722 

302110 

000008 




b 


;»0F DIGITS TO CONVERT. 

722 

0021 12 

30455" 

000650 



JSR 

R5.SDCNV 

{CONVERT ICNT TO DECIMAL ASCII. 

727 

302115 

001030 




ICNT 



tsc 

s <#to..-w 

002120 

003127 




AICNT 



* CX? 

002122 

•300005 




5 



•w* 

f c » 

002124 

134001 




TYPES 


{TYPE: 

728 

002125 

003075 




EMO 


{ERROR HEADER, 

72S 

002130 

1X30000 



ERR8: 

OPEN 


{ADDT’L ERROR MESSAGE IF ANY. 

< 

002132 

* 

i i { ; / f 




! 

' & 



731 

002134 

imoo r 



ERRC: 

EHALT 


; GO ERR HALT IF DESIRED. 

732' 

0G213S 

055718 

000004 



ADO 

ERRE, 37.6 


/ oo 

002145 

30D0G2 




RTI 


{EXIT. 

734 

302144 

300CC3 



ERRO: 

OPEN 



/ 35- 

003:45 

000000 



ERRE: 

OPEN 



•"•-“St- 

* <dfc 





{RANDOM 

NUMBER GENERATOR. ROUTINE EXITS WITH NUMBER IN REGISTTC 

737 

002150' 

313710 

000042 


ftNGEN: 

MOV 

RP1 , XC 


738 

0C21S4 

008100 




ROL 

7,0 


73S 

002158 

3081 CO 




ROL 

XQ 


740 

coaise 

088700 

000034 



ADD 

RP2.X0 


>1 

002184 

010067 

000026 



MOV 

7.0, HP 1 


742 

002170 

008100 




ROL 

XO 


743 

002172 

008100 




ROl 

7.0 


7*4W 

oeaim 

08870C 

000020 



ADO 

RP2.X0 


745 

002200 

OOblOC 




ROL 

XO 


74S 

0C22C2 

008 ICO 




ROL 

xO 


TH7 

002204 

010087 

000010 



MOV 

7.0, RP2 


748 

002210 

018700 

000002 



MOV 

RPl.XO 


748 

002214 

00C207 




RTS 

X7 

{EXIT. NUMBER IN RO 

750 

CC2218 

001233 



RP1: 

1233 



751 

002220 

007822 



RP2: 

7822 



752 





: SUBROUTINE TO 

OUTPUT ASCII MESSAGE ON TELETYPE PRINTER. 

753 

002222 

011800 



TVP: 

MOV 

3X6.X0 

;G£T ADDRESS THAT CONTAINS MESS* 

754 

002224 

082718 

000002 



ADD 

*2.3X6 

;SET UP EXIT. 

755 

002230 

011000 




MOV 

3x0. XO 

; ADDRESS OF MESSAGE TO RO. 

755 

002232 

112087 

COO 100 


TYPA: 

nova 

(O + .TYPOAT 

;GET CHARACTER 

/■v 

002238 

001008 




BNE 

TYPC 

{BRANCH IF NOT TERMINATOR.. 

758 

002240 

112787 

000177 

000070 


MOVB 

•177.TYPDAT 

{OUTPUT RU80UT. 

758 

0022% 

004787 

000020 



JSR 

7.7,T^PD 


780 

002252 

000002 




RTI 


{TERMINATOR CHAR. DONE. EXIT. 

781 

002254 

122787 

000C45 

000054 

TYPC: 

CMPB 

#45,TYPDAT 

{CHECK F0R"X". 

782 

002282 

001412 




BEG 

TYPft 

{BRANCH IF”X” 


G. 


TCI - TCi 1 TEST 1 
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D02 


763 

002264 

004767 

000002 

764 


000760 


765 

002272 

ii 57*77 

000040 

766 

002300 

AU3*' i < 

176516 

767 

002304 

1 003 **5 


763 

002306 

000207 


769 

002310 

112767 

0X015 

770 

002316 

004767 

177750 

771 

Xb322 

112767 

X0012 


002330 

004767 

177736 

773 

002334 

000736 


774 

002336 

300000 


& * 

?"*6 

002340 

011600 


t i t 

002342 

062716 

000002 

77S 

uOSJtb 

Hi liter' 

XX14 



n^7'L7 

5 3 1 

177777 

780 

002360 

001001 


781 

002362 

000002 


788 

002364 

104000 


733 

002366 

OOOOQO 


784 

002370 

000763 


785 




786 

002372 

Cl 1667 

00X36 

-POT 

f 

002376 

062716 

0X002 

788 

002402 

017746 

00X26 

7QQ 

002406 

QC5067 

175X4 

780 

C02H12 

0127% 

0X226 

791 

002416 

005316 


782 

002420 

0C1376 


793 

C02422 

005726 


-yry.1 

0C2H24 

005316 


795 

002426 

001371 


7% 

002430 

005726 


7Q? 

002432 

000032 


1*98 

002434 

OCCCCO 


799 




SCO 

bij; 

002^36 

C04/67 

177506 

602 

002442 

046700 

X0014 

803 

G02446 

0C14O4 


804 

C02%0 

01X67 

Q0CQ02 

SOS 

0C2**54- 

104015 


806. 

CC2%6 

OQGOQO 


807 

302^60 

000332 


eos 

002462 

GGCCGC 


809 




810 

002464 

004767 

177460 

811 

002470 

0%700 

0000 IQ 

812 

002474 

001773 


813 

002476 

01X67 

00X04 

c- u 

W* *■ ■* 

002500 

000207 


815 

0C2SQ4 

000X0 


Sit 

002506 

OGOOOC 


817 




818 

002510 

01P767 

177777 


176524 TYPD: 


000020 

000006 


TYPF : 
TYPG: 


COOOCfe 


JSR 
3R 

nova 
TSTB 
8PL 
RTS 
MOVB 
JSR 
MOVB 
JSR 
SR 

.'YPUTT: OPEN 
SUBRCUT I HE TO 
YPS: MOV 

ADO 

NOV 

'MO 

3NE 
RTI 
TYPE 
OPEN 
3R 

: SUBROUTINE TO 
uLY: NOV 

AOO 

NOV 

C» R 

OLYA: NOV 

DLYB: DEC 

BNE 

POPSP 

'ir ' 

BNE 

POPSP 

RT T 

DLCNT: 0°EN 

SUBROUTINE TO 
; DETERMINED BY 


’.7, TYPD 
TY®A 

TYPDAT , 3TPB 

DTPS 

.-4 


v.7 


*15, TYPDAT 

%7,tYP0 

*l£.TYPDAT 

%7.tYPD 

TY^A 


; TYPE CHAR IN TYPDAT 

; OUTPUT CHARACTER TO PRINTER 
; WAIT FOR DONE FLAG. 

EXIT 

NOVE CARRIAGE RETURN CODE TO TYPDAT 

GO TYPE CHAR. 

NOVE LF CODE TO TYPDAT. 

GO TYPE CHAR. 


TYPSA: 

TYPSB: 


OUTPUT A 
3X6. XO 

*2.3X6 
37.6, TYPSB 
S-i.TYPSB 
typSa 


TYPS 
DELAY 

3X6 .DLCNT 
*2,6X6 
SDiLCNT.-tb) 

PSW 

*226, -(6) 

3X6 

OLYB 

3X6 

OLYA 


§TAL: 


STALA: 

STALB: 

STLMSK: 


rsR 
SIC 
SEO 
NO' 1 ’ 
DELAY 
OPEN 
RTI 
OPEN 


SUBROUTINE TO 
6RCNT: JSR 


0000 14 


RCMSK: 

RN^NT • 

SUBROUTINE TO 
INBIN: NOV 


SIC 

BEQ 

NOV 

RTS 

OPEN 

OPEN 


SERIES OF ASCII MESSAGES ON TELETYPE PRINTER 

GET ADDRESS THAT CONTAINS MESSAGE ADDRESS 
UPDATE TO NEXT MESSAGE ADDRESS 
ADDRESS OF MESSAGE TO TYPSB 
CHECK FOR TERMINATOR 
BRANCH IF NOT TERMINATOR. 

TERMINATOR, EXIT 
CALL ON Ty£ SUB TO TYPE MESSAGE 
ADDRESS OF MESSAGE GOES HERE 
,G0 PROCESS NEXT MESSAGE 
A SPECIFIED NUMBER OF MILLISECONDS 
GET DELAY COUNT ADDRESS. 

SET UP EXIT ADDRESS 
DELAY COUNT TO STACK 
SET PRIORITY 0 
1 MSEC COUNT TO STACK 
DECREMENT 1 MSEC COUNT 
BRANCH IF NOT 0. 

ZERO. UNCOVER MSECS. COUNT. 

DECREMENT IT 
SR IF MOT DONE DELAYING 
DONE 
EXIT. 

.CONTAINS MILLISECONDS COUNT ADDRESS. 

STALL A RANDOM NUMBER OF MILLISECONDS. MAXIMUM STALL 
CONTENTS OF LOC STLMSK. 

X7.RNGEN ; GO GET RANDOM NUMBER. 

STOlSK,XQ ;* IN RO. APPLY STALL MASK. 

STALB ; BRANCH IF RESULT IS 0. 

XO, STALA 

; DELAY 

; DELAY COUNT 
.DONE. EXIT. 

:JTALL MASK. 

GENERATE RANDOM CHARACTER COUNT 
X7.RNGEN ; GET RANDOM NUMBER 

RCftSK.XO ; APPLY MASK 

GRCNT ;TRY AGAIN IF RESULT 0 

XO.RNCNT ; COUNT TO RNCNT 

X7 *EXIT 

•RANDOM CHARACTER MASK. 

.•RANDOM CHARACTER COUNT. 

INITIALIZE BINARY COUNT PATTERNS 
•-1.RIND ;SET ALL VARIABLES 



?! 






E02 


i TCI - T 

Cil r £ST 

4 
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( 04j:^u 

P1I 







319 

002515 

004557 

000222 


JSR 

‘<5 , PMOVE 

; TO MINUS 1. 

330 

002532 

Jwk 



RIND 



321 

002534 

002533 



RIND+l 



1 ODD 

S' %nwin, 

003533 

000013 



11. 



333 

002530 

000207 



RTS 

V? 

/ * 1 

: EXIT 

33-4 

002532 

000Q00 



RIND: OPEN 



33S 

002534 

300000 



PTO: OPEN 



325 

002S35 

00-3000 



PT1: OPEN 



337 

'002540 

330000 



PINO: OPEN 



333 

002542 

000000 



PTOP: OPEN 



QpQ 

%WU. w* 

002544 

000030 



PT1P: OPEN 



330 





: SPECIAL BINARY 

COUNT PATTERN SUBROUTINE. EXITS WITH BIN CHAR IN RO 

t 331 

002545 

315757 

177752 

177782 

&TBIN: NOV 

PTQ.PT1 

; PREVIOUS BIN CHAR TO PTI 

333 

002S54 

005157 

177755 


CON 

pti 


333 

-002550 

005157 

177745 


CON 

RIND 


934 

ooasst 

001002 



3NE 

. +6 


1 QIC 

iyc jw 

COS257 

’77744 


INC 

PTI 


safe 

-002572 

042757 

177400 

177736 

3IC 

*177400. PTI 

;MASK TO 8 8ITS 

337 

002500 

015757 

177732 

177726 

NOV 

PTi,PTO 

;SAVE BIN CHAR IN PTO 

S3S 

002505 

015700 

177724 


MOV 

PTI, 70 

; BIN CHAR TO RO. 

| 339 

002512 

-000207 



RTS 


; EXIT. 

840 

002514 

015757 

1 77422 

177722 

GTBINP: NOV 

PT0P.PT1P 

; PREVIOUS BIN CHAR TO PT1P 

841 

002522 

005157 

177715 


CON 

PTI? 


S43 

DQ2525 

005187 

177705 


COM 

PINO 


3*43 

002532 

001002 



BNE 

« 


j 844 

002534 

005257 

177704 


INC 

PT1P 


J Q4*C 

002540 

042757 

177400 

177676 

3IC 

*177400. PT1P 

;MA5K TO 8 BITS. : 

j 3% 

0Q254S 

015757 

177572 

177666 

NOV 

ptip,pt6p 

;SAVE BIN CHAR IN PTOP. 

! 347 

002554 

015701 

177554 


NOV 

PT1P.71 

;BIN CHAR TO Rl. 

i 848 

002550 

000207 



RTS 

7.7 

;EXIT. 

| 848 





: OCTAL TO ASCII 

CONVERT ROUTINE 


; sso 

1X2552 

013557 

000054 


6ACNV: NOV 

3(5)+. OACNVX 

;G£T OCTAL VALUE. 

| SSI 

002550 

012S01 



NOV 

(5)+,*a 

GET DESTINATION AODR. 

852 

002570 

C12S02 



NOV 

(5)+,72 

;GET CONVERT COUNT. 

> S53 

002572 

050201 



ADD 

72.7.1 

DEVELOP AODR TO STORE 1ST CHAR. 

| 854 

002574 

015703 

000042 


OACNVA: NOV 

OACNVX .7.3 


! 355 

002700 

042703 

177770 


C T * 
O k W 

*177776.73 

ISOLATE LEAST SIGNIFICANT DIGIT. i 

856 

008704 

052733 

000050 


ADD 

*60,73 

CONVERT DIGIT TO ASCII. 

s 3s/ 

002710 

110341 



M0V8 

73, -(1) 

STORE ASCII CHARACTER. 

S58 

002712 

042757 

000007 

000022 

SIC 

*7. OACNVX 


i 858 

rygrgn 

005057 

000018 


ROR 

OACNVX 


1 850 

002724 

005057 

000012 


ROR 

OACNVX 

i 

; 851 

QC273G 

C05Q57 

000008 


R OR 

OACNVX 

1 

1 853 

0C2734 

005302 



DEC 

72 ; 

DONE ALL DIGITS 7 

! 853 

002735 

001355 



BNE 

OACNVA ; 

BRANCH IF NOT DONE. j 

I 854 

002740 

000205 



RTS 

75 ; 

DONE. EXIT. 

1 85S 

3X742 

OOQCOO 



OACNVX: OPEN 


1 

355 





: SUBROUTINE TO MOVE A VARIABLE NUMBER OF BYTES. I 

1 85 7 

002744 

104012 



8M0VE: SAVREG 


SAVE REGS. 

! 8G8 

0027% 

012SC1 



MOV 

<5)4,71 

GET-FROM" ADDRESS 

» 859 

002750 

012502 



MOV 

(S)+,72 

GET" TO" ADDRESS 

j 870 

002752 

0125G3 



MOV 

( S ) ♦ , 73 

GET COUNT 

‘ 871 

00.2754 

112122 



BMOVA: MOVB 

(1)4, (2)4 

MOVE PYTE 

: 873 

002755 

005303 



DEC 

73 

DECREMENT COUNT 1 

‘ S73 

002750 

001375 



BNE 

BMOVA 

BRANCH IF NOT DONE. , 

i 874 

$ 

s 

002752 

104013 



RSTREG 


RESTORE REGS. 


TCI 

OCT. 


<e;*s « » 
4 v * a 

aa.pi: 


r EST 
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F 02 


?~b* 


3' 


3 Q0c7Sb 


379 



0C3070 


SS4 


0030 13 
0030 10 
30301* 
00301b 


.3-01-0 

J 12732 
012733 
30533* 
lb 1201 
103*03 
30533* 

'03 "7* 

OblODi 

0537> OQCObG 


:BINARY 

SDCNV: 


BOCNVA: 

BDCNVB: 


BDCNVC: 


Rf5 ‘.5 

TO DECIMAL 
SAVREG 

MOV 


ASCII CONVERT 


$ C 1 0C3C33 QGS3G3 


MOV 

MOV 

MOV 

a? a 

VLH 

SUB 

BCS 

INC 

BR 

ADD 

ADO 

MOVB 

TST 

DEC 


892 

C03034 

001384 



3NE 


3C3C3b 

C12501 



MOV 

SB* 

CC30*O 

C12S0? 



MOV 

S55 

0C3CS2 

CXG2C. 



ADD 

S9b 

CC3CW 

114091 



BDCNVD: M0V9 

s*r 

CG30*t 

00530? 



DEC 

coo 

rio 

X33S0 

001375. 



BNE 

8-99 

CTl¥^? 

1-09 Cl 3 



RSTREG 

50C 

003059 

000205- 



RTS 

SCI 

resosb 

023920 



TENPWR: 10000. 

903 

GC30b0 

ooi'se 



1000. 

903 

003X2 

COG!** 



IX. 

C£>i 

0*03X4 

000012 



10. 

905 

CC3Xb 

GGQQ01 



I 

90b 

33070 

w*Q 

0*0 

040 

DECVAL: .BYTE 

907 

CC3T3 

'0*0 

0*0 

040 


908' 





: ASCI I MESSAGES 

909 

Q G3T8 

0229*5 

02012* 


£f10: .ASCII 

SIC 

CC3102 

02C09C 

02X90 

050090 

ATNUMB: .ASCII 

911 

002.10 

020103 




512 

0031 12 

C2GC*G 

020090 

023090 

AfC: .ASCII 

513 

p.*p i prs 

C2O0*C 

091511 

05211b 


514 

00312b 

090 




Q'C 

LLc-kC- 

090 

02X40 

C2G040 

hICNT: .ASCI2 

51b 

003139 

02245b 

000 



517 

0C3137 

090 

042090 

052101 

EROPT: .ASCII 

SIS 

003199 

020101 

C511QS 

020122 


c 19 

003152 

0514*0 

041057 

020072 


520 

003 ISO 

C20CH0 

020040 

0200H0 

AASB: .ASCII 

521 

003 1 Sb 

020090 

053440 

051501 


522 

003179 

02QC72 




523 

00317Tb 

020090 

020040 

020040 

AWAS: .ASCII 

529 

003209 

020090 

050040 

042522 


925 

003212 

04452b 

052517 

020123 


52b 

003220 

040S27 

020123 



527 

003229 

020040 

020040 

02X40 

APUAS: .ASCI2 

528 

002232 

000 




529 

003233 

095 

042523 

020124 

ASETSR: .ASCI2 

530 

0032H0 

nr 1 ! 

W >«J A * tm W 

047440 

052120 



3(5>+.Rl 

•DECVAL.R0 

iTENPWR,R2 

»5,R3 

R4 

C2),R1 

aocAvc 

R4 

BDCNVB 
(2),R1 
*bO R4 
R4.!0)+ 
(2)+ 

R3 

BOCNVA 
(S)+,Ri 
(5)4, R2 
R2.Ri 

R2 

BOCNVD 
R5 


.•CONVERT 


DONE EXIT 
SUBROUTINE. 

SAVE REGS. 

GET BINARY VALUE. 

AOOR Of DECVAL TO RO. 

ADDA Of 10 POWER TO R2. 
SET UP FOR 5 CONVERSIONS. 
Clear result. 

10 POWER FROM VALUE. 

BR IF UNSUCCESSFUL. 

: 1 TO RESULT. 

60 IT AGAIN. 

RESTORE SUBTRACTED VALUE. 
RESULT TO ASCII. 

STORE RESULT. 

UPDATE 10 POWER ADDR. 

DONE 5 TIMES’ 

BR IF NOT. 

GET ADCR TO STORE ASCII. 
GET » OF DIGITS REQUIRED. 
START WITH LSD. 

TRANSFER CHARACTER. 

DONE’ 

BR IF NOT. 

RESTORE REGS. 

EXIT. 


BYTE 040.040,040,040.040.040 


1 XV.T 


PC 


V * 


ICNT * 


DATA ERR S/B: 4 


WAS: ’ 


PREVIOUS WAS ’ 



r 




TCI - ' 

TCli TEST 

« 

i 

02TC AA 

.pi: 


931 

333395 

097511 

532 

003354 

09^5.5 

933 

003353 

051440 

9> 

003370 

000 

935 

003371 

045 

935 

3032”6 

044514 

93r 

003309 

052123 

938 

003310 

00” 

939 

003311 

045 

SHQ 

303314 

032445 

9-1 

003333 

041534 

can 

T^C 

033330 

05150S 

l 9^3 

003335 

045101 

1 1. j 

Tn 

'003399 

0531 11 

995 

003352 

0S2123 

JPm.. II* 

003353 

042504 

1 997 

003355 

052103 

« 948 

0033 73 

095 

j 999 

003900 

099529 

| 950 

003905 

030055 

951 

003914 

091490 

955 

00342c 

045117 

953 

003930 

059501 

! 959 

003935 

051525 

955 

003444 

020124 

1 95b 

003953 

097111 

i 957 

003955 

051095 

958 

003959 

052040 

959 

003972 

093517 

9t>0 

3Q35Q0 

097509 

! %1 

003505 

052115 


%2 


: 


f 


f 


I 




fWCY ii 

an ”32) 

08-SEP* 

351515 

320055 


345523 

045101 


020 122 

030075 


047111 

QH0525 

ftINCRT: 

030104 

000055 

330052 

042524 

APGENO: 

041524 

020051 

POTIT: 

330451 

0530^0 


030124 

032451 


G20li4 

047125 


320133 

053515 


04 I OHO 

030105 


042523 

042514 


042105 

000 

352517 


051045 

043515 

TQMSG: 

030143 


041534 

330451 


097117 

051124 


042090 

046105 


043940 

045104 


045524 

047105 


047522 

027105 

052125 


043105 

051105 


020117 

051120 


090522 

020115 


052503 

092515 


022955 

000045 
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H02 


U Job lb 

003520 

nnocDD 


000000 
003b IS 
000001 
003534 


9^4 

nosers 

332767 

975 

003532 

D01001 

976 

Q*%**Jt, 

033534 

104011 

97S 

003536 

104000 

Q'TQ, 

■003540 

003373 

%d 

003543 

104005 

98 1 

003544 

012777 

982 

003552 

012777 

983 

003560 

005067 

984 

003554 

005267 

985 

003570 

02676? 

986 

G03S76 

1C 1772 

987 

003600 

005077 

988 

(^3604 

013777 

989 

003612 

000754 

990 



991 

003614 

000001 

993 

003bi6 

003646 

993 

003630 

001750 


003622 

003624 

995 



9% 



997 



998 

003634 

012767 

999 

003632 

005777 

1CC0 

00363s 

104011 

1001 

003640 

104003 

1002 

CC36H2 

022626 

1003 

003644 

104011 

IQG4 



1005 

0C3646 

000002 

1C06 

003650 

003700 

1007 

003652 

001750 

1008 

CC365H 

003656 

1009 



1010 

# ''1 



1012 

003656 

012767 

*oi -j 

A **•# A 

003664 

005777 

TOlU 

Jl»: W' A * 

00367Q 

104011 

intc 

A A At- 

0C3672 

104003 

1016 

003674 

022626 

1017 

003676 

104011 

1018 




174036 


030003 
000 1 00 
175344 
175340 
175334 

175300 

Q210CQ 


175334 

175334 


173773 


175174 


003643 

175150 


174152 


003672 

175114 


174120 


;*********♦**********#*********#*********************#******************* 

TO: 0 ; ROUTINE NUMBER 0 

II ; ADDRESS Of NEXT ROUTINE 

1 ; TEST ITERATION COUNT 

XAA SCOPE ENTRY POINT 

.LIST 

I************************************************************************ 

; TCI 1 CONTROL DELAY ADJUSTMENTS ROUTINE. 

: ROUTINE CAN BE EXECUTED ONLY BY SELECTING ROUTINE 0. 

;SR9=1 . SR6 THROUGH SRO SET TO 0. 


BIT 

BNE 

SCOPE 

TYPE 

TOMSG 

CHALT 


#BIT9,SR 

XAB 


; ROUTINE SELECT SWITCH SET 7 
BR IF YES. 

; NO . GET OUT. 

; TYPE ID AND INSTRUCTIONS. 


MOV 

CLR 

INC 

CMP 

8L0S 

CLR 

MOV 

BR 


; WAIT FOR USER. 
iMAINT ! RNUM! DO , atCGM 


#100,3TCST 

ICNT' 

ICNT 
ICNT, SR 
XAD 
3TCST 

#21000, 3TCCM 
XAC 


;S£T CLOCK FOR TPi. 
; CLEAR TIMER. 
.INCREMENT TIMER. 


'20 MSEC DELAY. 


;****«******************************************************************* 

tl: 1 ; ROUTINE NUMBER 1 * 

T2 ; ADDRESS OF NEXT ROUTINE * 

1000. ; TEST ITERATION COUNT * 

AAA ; SCOPE ENTRY POINT * 

.LIST 

;************************************************************************ 
:TEST ABILITY TO REFERENCE TCCM WITHOUT TRAPPING. 

6AA: MOV #AAB . MACHER : SET UP BUS ERROR TRAP. 

1ST 3TCCI*! ; REFERENCE ROEG. 

SCOPE ; OK IF NO TRAP OCCURS. SCOPE. 

AAB: ERROR ; TRAPPED WHEN REFERENCING RREG. 

P0PSP2 
SCOPE 


#AAB. MACHER 
3TCCI*! 


SCOPE : SCOPE 

:***#*********#*************iHHH****************************************** 

t2: 2 ; ROUTINE NUMBER 2 * 

13 ; ADDRESS OF NEXT ROUTINE * 

,000. ; TEST ITERATION COUNT * 

ABA ; SCOPE ENTRY POINT * 

.LIST 

;****«4HHHHHHHHHt*ft********************#ft****4***«*****»****************** 

: TEST ABILITY TO REFERENCE TCST WITHOUT TRAPPING. 


MOV 

TST 

SCOPE 

ERROR 

P0PSP2 

SCOPE 


iABB.MACHER 

3TCSt 


;S£T UP BUS ERROR TRAP. 

; REFERENCE RREG. 

; OK IF NO TRAP OCCURS. SCOPE. 

; TRAPPED WHEN REFERENCING RREG. 

; SCOPE 


* 


r 

i 


TCi 

orcAA.p 


TCI 1 

11 


TEST 


i oi a 

* w * * 

003700 

000033 

1020 

003702 

003732 

1021 

003704 

001 7S0 

1 TOO 
* kMmkm. 

QQ37QS 

003710 

1023 



1024 



* npc 



id?s 

0037 IQ 

012757 

1027 

003718 

UUb*' / ( 

1028 

■003722 

104011 

1029 

003724 

104X3 

1030 

00372b 

322525 

1031 

003730 

104011 

* 



*033 

003732 

000004 

1034 

003734 

X3754 

'03^ 

00373b 

0G1750 

-335 

003440 

003742 







*339 



iCSj 

P'O'TTU Z- 

WVV' T-U 

012757 

* Hu f 

5 A 

C037S0 

ULAn 1, * i 

ICS? 

003754 

104011 

1343 

003755 

104003 

1CS4 

003750 

022525 

1045 

003752 

104011 

1345 



i rv*— 

033754 

03X05 

1048 

003755 

004015 

*048 

1X33770 

X1750 

1050 

003772 

X3774 

■< nt t 

vji A 



1052 



1053 



1054 

003474 

012757 

’ C55 

004007 

X5777 

loss 

1X4005 

1GH011 


X4010 

104X3 

1058 

004012 

022525 

1058 

G04014 

104011 

10S0 



1081 

004015 

0GCC05 

1052 

004020 

004072 

10S3 

004C22 

0X144 

10S4 

X402H 

0GHC25 

1055 



lOSo 



1057 



10b8 

X4025 

CS2777 

1089 

X4034 

032777 

1070 

004042 

001002 

1071 

X4044 

104003 

1072 

004045 

104011 

1073 

004050 

042777 

1074 

X4055 

032777 


MAC v 1 1 27(732) Q8-SEP-75 09:0b PAGE 21 


102 


; ROUT I HE NUMBER 3 
; ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


003724 

17S072 


174QBS ftCA: 


T3: 3 

T4 

1000. 

ACA 
.LIST 

:****#*****o*#**M*******#**HHHHm************************************** 
TEST ABILITY TO REFERENCE TCDT WITHOUT TRAPPING. 


iACB.MACHER 

3TCDt 


SET UP BUS ERROR TRAP. 
REFERENCE RREG. 

OK IF NO TRAP OCCURS. SCOPE. 
TRAPPED WHEN REFERENCING RREG. 


00375b 

17503b 


174034 ADA: 


NOV 
TST 
SCOPE 
ACB: ERROR 

P0PSP2 

SCOPE * SCOPE 

;*l***********4HHt***************4«*************************************** 

t4: 4 ; ROUTINE NUMBER 4 * 

T5 ; ADDRESS OF NEXT ROUTINE * 

1000. ; TEST ITERATION COUNT * 

ADA ; SCOPE ENTRY POINT * 

.list 

I************************************************************************ 

TEST ABILITY TO REFERENCE TCBA WITHOUT TRAPPING. 


HAOB.MACHER 

3TCBA 


SET UP BUS ERROR TRAP. 
REFERENCE RREG. 

OK IF NO TRAP OCCURS. SCOPE. 
TRAPPED WHEN REFERENCING RREG. 


004010 

175002 


174002 AEA 


AEB: 


MOV 
TST 
SCOPE 

ADB: ERROR 

P0PSP2 

SCOPE • SCOPE 

;jHHHHHHK*****M****«*ft***ft***ft*4*****#«***********1HHHHHHt*************** 

t5: 5 ; ROUTINE NUMBER S * 

TS ; ADDRESS OF NEXT ROUTINE * 

1300. -.TEST ITERATION COUNT * 

AEA ; SCOPE ENTRY POINT * 

.LIST 

:«*«*#*****ft*******MftM*******ft****************ftft«****ft*»*************** 

TEST ABILITY TO REFERENCE TCWC WITHOUT TRAPPING. 


MOV 
TST 
SCOPE 
ERROR 

P0PSP2 

SCOPE 


•AEB.MACHER 

2TCWC 


SET UP BUS ERROR TRAP. 
REFERENCE RREG. 

OK IF NO TRAP OCCURS. SCOPE. 
TRAPPED WHEN REFERENCING RREG. 

; SCOPE 


«JVVI V. « WW* 

;JHHt*«****4Ht*«***************M******M*********#***tt»**************»**** 

tb: b : ROUTINE NUMBER b * 

T7 : ADDRESS OF NEXT ROUTINE * 

100. iTEST ITERATION COUNT * 

AFA ; SCOPE ENTRY POINT * 

.LIST 

:***M*****JHHHtJHHHHHHHHt****ft**#******)HHHHHt4Ht*************************** 




TEST THAT TCDT BITQ CAN BE SET. 

AND CLEARED. 

X00C1 

174750 

AFA: 

BIS 

*8IT0,3TC0T 

; SET TCOT BITO. 

000001 

174752 


BIT 

*BIT0!3TC0T 

; SEE IF BIT IS SET. 




BNE 

.+b 

; BRANCH IF SET. 




ERROR 


ITCDT BITO FAILED TO SET 




SCOPE 



000001 

174735 


BIC 

*BIT0,3TC0T 

; CLEAR TCDT BITO. 

000001 

174730 


BIT 

#BITQ, 3TCDT 

; SEE IF BIT IS CLEAR. 



TCI - 

TCil TEST 

1 

MAC YU 

27(732) 

02TCA4.Pi: 




xors 

004064 

0014Q1 



1376 

QQH066 

104003 



1077 

004070 

104011 



13-3 





10~9 

004072 

000007 



1050 

004074 

004126 



1031 

004075 

000012 



1092 

004100 

004102 



1333 





1084 





1035 





108b 

004102 

Jbc. i 

OOOCOl 

174704 

1037 

00^110 

104010 



1093 

00*412 

032777 

Q000Q1 

174574 

1089 

004120 

001401 



1090 

004122 

104003 



1091 

004124 

104011 



1092 





1093 

004125 

000010 



1094 

004130 

004202 



1095 

004132 

000144 



10% 

004134 

004136 



1087 





1093 





1089 





1100 

004136 

052777 

000002 

174650 

1101 

004144 

032777 

000002 

174642 

1102 

304152 

031302 



*133 

J04154 

104003 



1104 

004156 

104011 



1105 

004150 

042777 

000002 

174626 

11% 

004166 

032777 

000002 

174620 

1107 

004174 

001401 



1108 

004176 

104003 



1108 

004200 

104011 



1110 





1111 

004202 

000011 



1113 

004204 

004236 



1 1 

004206 

000012 



1114 

1115 

1 t t L 

004210 

004212 



* * i i 

1113 

00212 

052777 

000002 

174574 

1119 

004220 

104010 



! 1 30 

004222 

G32777 

000Q02 

174564 

1*21 

004230 

0C1401 



1122 

004232 

104003 



1123 

004234 

104011 



11 ? 4 





1125 

004236 

000012 



1126 

004240 

004312 



1127 

004242 

000144 



1128 

004244 

004246 




| 1*29 

1130 

I 

» 


L 
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J02 


BEQ .+4 ; BRANCH If BIT IS CLEAR. 

ERROR TCOT BITO FAILED TO CLEAR. 

SCOPE ; SCOPE. 

t?: ? {ROUTINE NUMBER 7 * 

T10 ; ADDRESS OF NEXT ROUTINE * 

10. ;TEST ITERATION COUNT * 

3AFA {SCOPE ENTRY POINT * 

.LIST 

;*ftM#tt*ftMftftftftftft**ft*ft*****ft#*****«»****ft*fttt*tt*ft**#ftft********#ft********** 
{TEST THAT RESET INSTRUCTION CLEARS TCDT BITO 
§AFA: BIS #BIT0,3TCDT ; SET TCDT BITO 

SRESET {ISSUE RESET TO CLEAR BIT. 

BIT *BIT0,3TCDT ; SEE IF BIT IS CLEAR. 

8E0 BAFB ;9R IF BIT IS CLEAR. 

ERROR {RESET FAILED TO CLEAR TCDT BITO 

BAFB: SCOPE : SCOPE. 


TlQ: IQ {ROUTINE NUMBER 10 * 

Til {ADDRESS OF NEXT ROUTINE * 

100. {TEST ITERATION COUNT * 

AGA {SCOPE ENTRY POINT * 

.LIST 

{ft*********************************************************************** 

:TEST THAT TCDT BIT1 CAN BE SET, AND CLEARED. 

AGA: BIS »3IT1,3TCDT ; SET TCDT BITi. 


BIS 
BIT 
9NE 
ERROR 
SCOPE 

BIC #BIT1,3TCDT {CLEAR TCDT BITI. 

BI T tBITl,3TCDT {SEE IF BIT IS CLEAR. 

BEQ .+4 {BRANCH I" BIT IS CLEAR. 

ERROR ;TCDT BITI FOILED TO CLEAR. 

SCOPE ;SC ,P£. 

;****t«*i«««****««*««*#«*»*HH«H»*H«**HHH**H«*H»HtH 

Til: 11 {ROUTINE NUMBER 11 * 

T12 {ADDRESS OF NEXT ROUTINE * 

10. {TEST ITERATION COUNT * 

9AGA {SCOPE ENTRY POINT * 

.LIST 

;*********iHtft******#****1Httt***#ft**********»*4HHHtft************************ 

{TEST THAT RESET INSTRUCTION CLEARS TCOT BITI 
&AGA: BIS *9ITI,3TCDT ;SET TCDT BITI 

SRESET {ISSUE RESET TO CLEAR BIT. 

BIT iBITl,3TCDT ;SEE IF BIT IS CLEAR. 

BEQ BAGB : BR IF 81 T IS CLEAR. 

ERROR {RESET FAILED TO CLEAR TCDT BITI 

BAGB: SCOPE {SCOPE. 

•******4Ht*****1Hfr**ft****ft*******ft***************************************** 

tl2: 12 {ROUTINE NUMBER 12 * 

T13 {ADDRESS OF NEaT ROUTINE * 

100. TEST ITERATION COUNT * 

AHA ; SCOPE ENTRY POINT * 

.LIST 

;************************************************************************ 


*BITi,3TC0T 

.+6 


SET TCDT BITI. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCDT BITi FAILED TO SET. 


tBITl.STCDT 

•BIT1,3TCDT 

.+4 


BAGB: 









K02 



TCI - 

ten TEST 

1 

MACYil 

27(732) 
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i OZTCAA 

.pi: 









1131 





{TEST 

THAT TCOT BIT2 CAN BE SET 

, and cleared. 


1 1 ID 

. * «3»_ 

004246 

nr '*1 
UbCi / i 

000004 

174540 

AHA: 

315 

*8IT2,3TC0T 

; SET TCOT BITS. 


1133 

004254 

0 ^ 

000004 

174532 


BIT 

#BIT2,3TCDT 

; SEE IF BIT IS SET. 


[ 113 4 

004262 

001002 




3NE 

.+6 

•3RANC i IF SET. 


ns 

004264 

104003 




ERROR 


; r CDT 8IT2 FAILED TO SET. 


113:. 

004266 

104011 




5C0PE 




1 ? 

| 4 «* W ’ j; 

004273 

042777 

000004 

174516 


SIC 

iBIT2,3TC0T 

; CLEAR TCOT BIT2. 


1138 

004275 

332777 

000004 

174510 


SIT 

MBIT2.3TC0T 

; SEE IF BIT IS CLEAR. 


1138 

004304 

001401 




BEQ 

.+4 

; BRANCH IF BIT IS CLEAR. 


* 1183 

004306 

1340Q3 




ERROR 


; TCDT BITS FAILED TO CLEAR. 


1141 

004310 

104011 




SCOPE 


; SCOPE. 


1142 





:**************************************************::********************* 

j 1143 

004312 

030013 



T 13: 

13 


{ROUTINE NUMBER 13 

* 

: 1144 

004314 

004346 




T 14 


{ADDRESS OF NEXT ROUTINE 

* 

1145 

004316 

000012 




10. 


{TEST ITERATION COUNT 

* 

1 I -lib 

i i | 

004320 

004322 




SAHA 

i TCT 


{SCOPE ENTRY POINT 

* 

! 1148 





;************************************************************************ 

! -149 





{TEST 

THAT RESET INSTRUCTION CLEARS TCOT BIT2 


| -ISO 

004322 

052777 

000004 

174464 

BAH A: 

SIS 

iBIT2,3TC0T 

;SET TCOT BITS 


] ^ -1S1 

004330 

104010 




SRESET 


{ISSUE RESET TO CLEAR BIT. 


I * •; c*‘» 

1 «» 44 

004332 

032777 

000004 

174454 


SIT 

•BIT2.3TCDT 

;SEE IF BIT IS CLEAR. 


> 1153 

004340 

001 40 x 




SEQ 

BAHB 

;BR IF BIT IS CLEAR. 


i 

004342 

104003 




ERROR 


{RESET FAILED TO CLEAR TCDT BITS 


i 4# *>» 

004344 

104011 



BAHB: 

SCOPE 


: SCOPE. 


115b 





• ************************************************************************ 

1 ilb/ 

004346 

000014 



T14: 

14 


{ROUTINE NUMBER 14 

* 

1158 

'004350 

004422 




T 15 


{ADDRESS OF NEXT ROUTINE 

* 

,i 1159 

004352 

000144 




103. 


{TEST ITERATION COUNT 

* 

j 1150 

$ ' 7 £1 ! 

004354 

004356 




AIA 

i rcr 


{SCOPE ENTRY POINT 

* 

I 4> D ■* 

i 1152 





:************************************************************************ 

j 1153 





•TEST 

THAT TCOT BIT3 CAN BE SET. 

AND CLEARED. 


| 1154 

30*356 

052777 

000010 

174430 

AlA: 

SIS 

«BIT3,3TCDT 

;SET TCDT 8IT3. 


j 1165 

00436-r 

032777 

000010 

174422 


SIT 

#BIT3,3TCDT 

;SEE IF BIT IS SET. 


1156 

004372 

001002 




BNE 

.+6 

{BRANCH IF SET. 


1167 

00*37** 

104003 




ERROR 


;TCDT BITS FAILED TO SET. 


? 1168 

004376 

104011 




SCOPE 




1169 

004400 

042777 

000010 

1744Q6 


SIC 

«BIT3,3TCDT 

; CLEAR TCDT BIT3. 


1170 

004406 

032777 

000010 

174400 


SIT 

•BIT3.3TCDT 

;SEE IF BIT IS CLEAR. 


1171 

004414 

001401 




BEQ 

.+4 

{BRANCH IF BIT IS CLEAR. 


1172 

0)4415 

104003 




ERROR 


;TCDT BIT3 FAILED TO CLEAR. 


1173 

O0442C 

104011 




SCOPE 


{SCOPE. 


1174 





•A*********************************************************************** t 

113 

004422 

030015 



T 15: 

IS 


: ROUTINE NUMBER 15 

* 

1176 

004424 

004456 




116 


{ADDRESS OF NEXT ROUTINE 

* 

; 1177 

004426 

000012 




10. 


: TEST ITERATION COUNT 

* 

t 1178 

004430 

004432 




BAIA 


{SCOPE ENTRY POINT 

* 

I 1179 






.LIST 



I 

j Ileo 





:************************************************************************ 

f 1181 





:TEST 

THAT RESET 

INSTRUCTION CLEARS TCOT BIT3 

■ 

| 1182 

004432 

052777 

000010 

174354 

BAIA: 

BIS 

iBIT3,3TC0T 

;SET TCOT BIT3 

| 

; u83 

004440 

104010 




SRESET 


{ISSUE RESET TO CLEAR BIT. 


| 1184 

004442 

032777 

000010 

174344 


BIT 

•BIT3, 3TCDT 

;SEE IF BIT IS CLEAR. 

s 

1185 

004450 

001401 




BEQ 

BAIB 

;BR IF BIT IS CLEAR. 

1 

j 1186 

1 

j 

i 

1 

L 

004452 

104003 




ERROR 


{RESET FAILED TO CLEAR TCDT BIT3 




! TCI - ' 

TCil TEST 

? 

'4 

MACY11 

27(732) 

02TCAA.P11 

. 




1 1 iS7 

004454 

104011 



j uas 





1 USB 

004455 

00001 j 



1 U90 

004460 

004532 



\ 1191 

004 a 62 

000144 



1 1192 

0Q4464 

004465 



U93 

1194 





:: 1195 

‘ 11 9b 

004465 

052777 

0QQG2Q 

174320 

!iq? 

<4 A J » 

304474 

■ 032777 

000020 

174312 

1193 

004502 

301302 



f 1199 

034504 

104003 



.< 1200 

004505 

104011 



! •: 30! 

a «% w-w * 

004510 

042777 

000020 

174276 

■? 30.3 

004515 

032777 

000020 

174270 

! -.203 

004524 

001401 



i -• .3r>i 

nnucoc 

104003 



i uos 

004530 

104011 



1 120b 





1207 

1X34532 

00X17 



| ,208 

004534 

004555 



S 1209 

004536 

000012 



i 1210 

: 1211 

f 'f! 3 ? 3 

•304540 

004542 



) 12,13 

i ' e-u 

* W * * 

00^542 

f i 

000020 

174244 

1215 

004550 

104Q10 



i 1215 

004552 

032777 

XX20 

174234 

1217 

004560 

001401 



1218 

004562 

104003 



i i3i q 

1 «4%» A, U 1 

004564 

104011 



! 1220 





{ 1221 

0C4566 

000020 



1 ‘ 300 

004570 

004642 



: 1223 

004572 

000194 



i 1224 

CS>574 

004576 



1225 





j 1226 





1227 





1 1228 

CC-4575 

052777 

X0040 

174210 

| 12c 9 

004604 

032777 

000040 

174202 

? 1230 

0046 12 

0G1G02 



1231 

00*514 

104003 



{ 1232 

GC4616 

1040x1 



1 1233 

X*4620 

042777 

000040 

174166 

1 1234 

004626 

032777 

000040 

174160 

123S 

QC463H 

001401 



1 1236 

QQ4636 

104X3 



i ; 1237 

004640 

104011 



i 1238 





: 1239 

004642 

0X021 



1 12H0 

004644 

X4676 



I 1241 

004646 

XX12 



1242 

004650 

004652 




LQ2 
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BAIB: SCOPE ; SCOPE. 

;**HHt«*jm*************#****#m**************************************** 
Tib: ib ; ROUTINE NUM3ER 16 

T17 ; ADDRESS OF NEXT ROUTINE 

100. TEST ITERATION COUNT 

AJA ; SCOPE ENTRY POINT 

-LIST 

;****#***#******************«*#***************************************** 
:TEST THAT TCDT BITS CAN BE SET, AND CLEARED. 


iBIT4,3TCDT 
iBIT4,3TCDT 
. +6 


SCOPE 

BIC iBITH, 3TCDT ; CLEAR TCDT BITS. 

BIT iBIT4,3TCDT ; SEE IF BIT IS CLEAR. 

3EQ . +S ; BRANCH IF BIT IS CLEAR. 

ERROR ; TCDT SITS FAILED TO CLEAR. 

SCOPE : SCOPE. 

tl7: 17 ; ROUTINE NUMBER 17 * 

T2Q ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BAJA ; SCOPE ENTRY POINT * 

.LIST 

•********«***************##*##**0*********************Hf**************** 
:TEST THAT RESET INSTRUCTION CLEARS TCDT BITS 
&AJA: BIS »8ITS,3TC0T ; SET TCDT bITS 

SRESET ; ISSUE RESET TO CLEAR BIT. 

BIT «BITS,3TCDT ; SEE IF BIT IS CLEAR. 

BEQ BAJB ;3R IF BIT IS CLEAR. 

ERROR ; RESET FAILED TO CLEAR TCDT BITS 

BAJB: SCOPE ; SCOPE. 

;**#**#*******#*************«*********iH******$H^************************ 

t20: 20 ; ROUTINE NUMBER 20 * 

T21 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AKA SCOPE ENTRY POINT * 

.LIST 

;********************«*************************************************** 

: TEST THA T TCDT BITS CAN BE SET, AND CLEARED. 


; SET TCDT BITS. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCDT BITS FAILED TO SET. 


iBITS, 3TCDT 
iBIT4,3TCDT 
. +S 


urvrwn 

SCOPE 


ISSUE RESET TO CLEAR BIT. 
.err re qtt re n roe 


BAJB: 


SIS 
BIT 
8N£ 

ERROR 
SCOPE 

BIC iBIT5,3TCDT ; CLEAR TCDT BITS. 

BIT iBITS 3TCDT ; SEE IF BIT IS CLEAR. 

BEQ .+S ; BRANCH IF BIT IS CLEAR. 

ERROR ;TCDT BITS FAILED TO CLEAR. 

SCOPE : SCOPE. 

•ft*********************************************************************** 

t21: 21 ; ROUTINE NUMBER 21 * 

T22 ; ADDRESS OF NEXT ROUTINE * 

10. TEST ITERATION COUNT * 

BARA ; SCOPE ENTRY POINT * 


•8IT5,3TCDT 
iBITS, 3TCDT 
.+6 


; SET TCDT BITS. 

;SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCDT BITS FAILED TO SET. 


•BIT5,3TCDT 
•BITS 3TCDT 
.+S 


m m 


TCI - TCli TEST 1 
D2TCflA.RU 


1243 



1244 



1245 



1246 

004652 

052777 

1247 

Q0466Q 

104010 

1248 

004662 

032777 

1249 

004670 

001401 

1250 

004672 

104003 

1251 

004674 

104011 

1252 



1253 

004676 

000022 

1254 

004700 

004752 

1255 

004702 

000144 

1256 

004704 

004706 

1257 



1258 



1259 



1260 

004706 

052777 

1261 

004714 

032777 

1262 

004722 

001002 

1263 

004724 

104003 

1264 

004726 

104011 

1265 

004730 

042777 

1266 

004736 

032777 

1267 

004744 

001401 

1268 

Q04746 

104003 

1269 

004750 

104011 

1270 



1271 

004752 

000023 

*2/2 

004754 

005006 

1273 

004756 

000012 

1274 

004760 

004762 

1275 



1276 



,077 



1278 

004762 

052777 

1278 

004770 

134010 

1280 

004772 

032777 

1281 

005000 

001401 

1282 

005002 

104003 

1283 

005004 

104011 

1284 



1285 

005006 

000024 

1286 

005010 

005062 

1287 

005012 

000144 

Xtm 

nncn 1 u 
* 

005016 

1289 



1290 



1291 



1292 

00501b 

US2777 

1293 

nncnpu 
uwwwC * 

032777 

1294 

005032 

001002 

1295 

OU5024 

104003 

1296 

005036 

104011 

1297 

005040 

042777 

1298 

005046 

032777 
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M02 


0C0040 

000040 


174134 

174124 


.LIST 

;#mm*#*#«Htt*JHHHHJm#m#**##*#****#**#*##*#*##**##***##**##**####*# 
JEST THAT RESET INSTRUCTION CLEARS TOOT BITS 


BIS #BIT5,3TCDT 

SRESET 

BIT #BITS,3TCDT 

3EQ BAKB 

ERROR 

SCOPE 


000100 

000100 


000100 

000100 


174100 

174072 


174056 

174050 


6AKA: BIS ' #BIT5,3TCDT ' ; SET TCDT BITS 

ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;SR IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCDT BIT5 

BAKB: SCOPE ; SCOPE. 

T22: 22 ; ROUTINE NUMBER 22 * 

T23 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

ALA ; SCOPE ENTRY POINT * 

.lIST . 

;M******************************M************************************** 
JEST THAT TCDT BIT6 CAN BE SET, AND CLEARED. 


ALA: 


SIS 
BIT 
8 NE 
ERROR 
SCOPE 
SIC 
BIT 
BEG 
ERROR 
SCOPE 


#BIT6,3TCDT 
#BIT6,3TCDT 
.+6 


SET TCDT BIT 6 . 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCDT BITS FAILED TO SET. 


#BIT6,3TCDT 

«BIT6,3TCDT 

.+4 


000100 

000100 


174024 

174014 


CLEAR TCDT 8 IT 6 . 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

TCDT BITS FAILED TO CLEAR. 
jvw. .. .'SCOPE. 

j*ftmftft**m«****ft*tt****ft*Mftft*******ft**tt*»ft*ftX*****ftft****ft***S*******ft* 
tS3: 23 ; ROUTINE NUMBER 23 * 

T24 ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BALA SCOPE ENTRY POINT * 

.LIST 

;********************#***********M************************************** 

TEST THAT RESET INSTRUCTION CLEARS TCDT BIT 6 


I * I 

§ALA: 


BALB: 


BIS 

SRESET 

BIT 

B£Q 

ERROR 

SCOPE 


#BIT6,3TCDT 


#BIT6,3TCDT 

BALB 


000200 

000200 


000200 

000200 


173770 

173762 


173746 

173740 


i SET TCDT BIT 6 
ISSUE RESET TO CLEAR BIT. 

;SEE IF BIT IS CLEAR. 

; 8 R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCDT BIT6 
WM|»W • km ; SCOPE. 

;**********#************************************************************* 
T24: 24 ; ROUTINE NUMBER 24 * 

T25 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AMA ; SCOPE ENTRY POINT * 

.LIST 

;ttft«ttftX«ft**«*ft«*ftftXftttftft*XXftftXXttXftftXft*«»ft*ftXX»*ftXXftftftftttX*ftXftXXftX*XXXftX**4# 
JEST THAT TCDT BIT7 CAN BE SET, AND CLEARED. 


§ » w w 

AMA: 


BIS 
SIT 
BNE 
ERROR 
SCOPE 
BIC 
BIT 


#BIT7,3TCDT 

«BIT7,3TCDT 

.+6 


iBIT7,3TCDT 

#BIT7,3TCDT 


; SET TCDT BIT7. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCDT BIT7 FAILEO TO SET. 

; CLEAR TCDT BIT7. 

•SEE IF BIT IS CLEAR. 



r 


TCI - TCI 1 TEST i 
D2TCRA.P1 1 


1399 

1301 


.t;o3 

l 30S 
;i30b 
130? 
.1308 
.1309 
1310 

.V «k 1 

.1318 
1313 
131 h 
*n 

A W * ‘tow* 

13 IS 
13 i / 
...» 1 3 
1319 
1380 
13c 1 
1338 

•i to "5 

132 4 

188S 

1338 

1337 

1338 

i “i; 


lc>30 

1331 

1333 

1333 

1334 

1335 
1338 

1337 

1338 
1338 

1340 

1341 
1343 

1343 

1344 

1345 
1348 

1347 

1348 

1349 

1350 

1351 
1353 

1353 

1354 


005054 

005058 

005080 

005083 

0QSQ84 

Q05Q88 

005(370 


005073 
0051 00 
005103 
005 1 1 u 
005a 3 

005114 

005118 

005130 

005133 

005134 


■005138 

005134 

005143 

'005144 

005148 

005150 

005158 

005184 

005188 

005170 

005172 

005174 

005178 

005300 


035303 

005210 

005212 

005220 

005222 

005224 

005228 

C05230 

005232 

C05234 


000027 

OOS2L8 

000012 

005202 


052777 

104010 

032777 

001401 

104003 

104011 

000030 

005302 

m 
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NQ2 


001401 

104Q03 

104011 

000025 

005118 

000012 

005072 


053777 

104010 

033777 

001401 

104003 

104011 

000028 

005173 

000144 

005128 


BEQ .+4 ; BRANCH IF BIT IS CLEAR. 

ERROR ; TCDT BIT7 FAILED TO CLEAR. 

SCOPE : SCOPE. 

: 4444444**44444444444444444444444*444444444*44444444444444444444444444444 


•.ROUTINE NUMBER 25 
ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
SCOPE ENTRY POINT 


000200 173714 
000200 173704 


t2S: 25 

T28 

10 . 

BAMA 

.LIST 

; 4444444*444444444444444444444444*44444444444444*44444444444444444444444* 

: TEST THAT RESET INSTRUCTION CLEARS TCDT EIT7 
6AMA: BIS •BIT7,aTCDT ;SET TCOT BIT 7 

; ISSUE RESET TO Cl EAR BIT. 
tBIT7,3TC0T ; SEE IF BIT IS CLEAR. 

BAMS ;9R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCDT BIT7 
; SCOPE. 


BIS 
SHESET 
BIT 
BEQ 
ERROR 
SCOPE 


Ht4»4444iT**444444444444444444444i*44K*44**«****44444444*44 


tas:* 


28 

T2? 


j ROUTINE NUMBER 28 
; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


IOQ 
ANA 
.LIST 

444444***t4444K*4444444444444444*»4«444**44*»444444444444444444444444*44 


* 

* 

* 

4 





:TEST 

&NA: 

THAT TCDT BITS CAN BE 

SET, AND CLEARED. 

052777 

OOOHCO 

173880 

BIS 

•BITB.aTCDT 

;SE T TCDT BITS. 

032777 

001002 

10H003 

1 GH 011 

OOOMOO 

173852 


BIT 

8 NE 

ERROR 

SCOPE 

«BIT 8 ,aTCDT 

.*8 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCOT BIT 8 FAILED TO SET. 

0*42777 

000400 

173838 


arc 

•BITB.aTCDT 

; CLEAR TCDT 8 IT 8 . 

032777 
0G1H01 
10H003 
10 H 01 I 

000400 

173830 


BIT 

BFQ 

ERROR 

SCOPE 

•BITB.aTCDT 

.+4 

;SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEP 
; TCDT BITS FAILED TO Ct <R. 
; SCOPE. 


, * 4444444* *4444444**4*444**4 44444* 4**44 44 *44 *4444 44 ,X' *4444444 i 44444*444444 

t27: 27 : ROUTINE HUMBER 27 4 

130 ; ADDRESS OF NEXT ROUTINE 4 

10. ; TEST ITERATION COUNT * 

SANA ; SCOPE ENTRY POINT * 

.LIST 

; 4444444*4*4444444444444444444444*4444444*444 *444444444444444444444444444 


DOQHQO 173804 
000400 173574 


.TE< 

6an? 


BANS: 


THAT RESET 

BIS 

5RESET 
BIT 
BFQ 
ERROR 
SCOPE 


N« 

»Blt 8 ,i 


TION CLEARS T 


COT 


BITS 


•01T8.3TCDT 

BANB 


;SET ?COT BIT 8 
; ISSUE RESET TO 


'LEAR BIT. 


; SEE IF BIT IS CLEAR. 

;BR IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCDT BTT 8 
.•SCOPE. 


444444444444444444444444444444 444 *4444444 *4# 444444444444444444*4444444*4 

* 
4 
4 
4 


t30: 30 

T31 

100 . 

AOA 
.LIST 

; 4*44444*44444444*4444444444444444444444444444444444444444444*4*444444444 


;ROl r, NE NUMBER 30 
;AOu .SS OF NEXT ROUTINE 
•TEST ITERATION COUNT 
•SCOPE ENTRY POINT 


m m m m 


TCi ~ TCi- 

o:tca4.p;i 


rrcr < 

* 1 m * <4 


1355 



1353 

005c: 36 


13b. 

005244 

0 

1353 

005252 

o5Too2 

1359 

0CS264 

10H003 

1350 

005256 

104011 

1361 

005260 

042777 

» 

m '%»>* W'4»» 

005266 

0327T 

1353 

005274 

001401 

1364 

005276 

104003 

i 355 
1366 
1357 

005300 

104011 

005302 

000031 

1369 

005304 

005336 

1359 

005306 

000012 

- •j**n 

-% w * W 

005310 

005312 

1371 



, 



1373 



.1374 

005312 

f%f» *\*+*%»9 

Loci' t t 

1375 

005320 

104010 

1375 

005322 

032777 

1377 

005330 

001401 

1379 

005332 

104003 

1379 

D0S334 

104011 

1330 



1381 

005336 

000032 

1392 

0053HQ 

005412 

1383 

005342 

000144 

1384 

005344 

0053% 

1395 



1396 



1387 



1398 

005346 

352' t 

1399 

0^5354 

03277^ 

1390 

005362 

001002 

1391 

005364 

104003 

1392 

005366 

.104011 

1353 

005370 

0+2777 

1394 

005376 

032777 

1395 

E0540H 

001401 

13% 

005406 

104003 

1397 

005410 

104011 

1398 



1399 

005412 

000033 

IHQO 

005414 

005446 

1401 

005416 

000012 

1432 

1403 

005420 

005422 

1404 



1405 


052777 

1406 

005422 

1407 

005430 

104010 

1406 

005432 

032777 

1409 

1410 

005440 

001401 

005442 

104003 
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00 1 GOO 
001000 


OCIOOO 

001000 


173550 

173542 


173526 

173520 


001000 
00 l coo 


173474 

173464 


002000 

002000 


0C2000 

002000 


173440 

173432 


173416 

173410 


002000 

002000 


173364 

173354 


TEST THAT TCDT BITS CAN BE SET, 


i « few 

AOA : 


9I T 


.6 
liT 
BNE 
ERROR 
SCOPE 
SIC 
31 T 
BEG 
ERROR 
SCOPE 


•BIT9.3TCDT 

•BIT9.3TCDT 

.♦6 


and cleared. 

;C£? TCDT BITS. 

;St£ IF BIT IS SET. 

; 3RANCH IF SET. 

: ’’COT am FAILED TO SET. 


•BIT9.3TC0T 

•BIT9.3TCDT 

.+4 


; C-EAR TCDT BITS. 

■ ; SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; TCDT BITS FAILED TO CLEAR. 

* SCO : 

‘ *»*#*»**»***#*****»**#«**«**#*#* »*»tft»ttfrt*tttft«*****#t#**t*t*»********* 

tai : 31 ; ROUTINE NUMBER 31 

T32 ; ADDRESS OF NEXT ROUTINE 

10. ; TEST ITERATION COUNT 

BAOA ; SCOPE ENTRY POINT 

-LIST 

;*****#« 

: TEST THAT RESET INSTRUCTION CLEARS TCDT BITS 
§AOA: 913 i8IT9,3TCDT ;5ET TCDT BITS 


BAOB 


SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


*0IT9,3TCDT 

BAOB 


; ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;9R IF 9I T IS CLEAR. 

; RESET FAILED TO CLEAR TCDT BIT9 
SCOPE. 


lirrvw i fe • n>vvf fe# 


t32: 32 

T 3J 
100. 
APA 
.LIST 


: ROUTINE NUMBER 32 
; AODRESS OF NEXT ROUTINE 
; TEST ITERATIuN COUNT 
; SCOPE ENTRY POINT 


• * fefe 

APA: 


EST THAT TCDT BIHQ CAN BE SET. ANO CLEARED 


BIS 
BIT 
8NE 
ERROR 
SCOPE 
BXC 
BIT 
BEQ 
ERROR 
SCOPE 


»BITig,3TC0T 
•8IT1D.3TCDT 
>6 


•BIT10.3TC0T 
•BITIQ, 3TCDT 
. +4 


; SET TCDT BITIQ. 

; SEE IF BIT IS SET. 


; BRANCH IF SS 
; TCDT BITIQ f 


AILED TO SET. 


; CLEAR TCDT BITIQ. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; TCDT BITIQ FAILED TO CLEAR. 

; SCOPE. 


*IVW» fe i fe * 

**t*«»*******ft#«*t***#t*#«***»*««ft*»*«tft*ft*t**ttt#t*«»**t«***«****ft***** 


t33: 


ROUTINE NUMBER 33 
AODRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


33 
T34 
10 . 

BAPA 
.LIST 

: TEST THAT RESET INSTRUCTION CLEARS TCOT BITIQ 
§APA: BIS •BIT10.3TCDT ;$£T TCDT BIT10 

; ISSUE RESET TO CLEAR BIT. 

;$EE IF BIT IS CLEAR. 

;8R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCD* BIT1C 


SRESET 

BIT 

BEQ 

ERROR 


•BIT10.3TCDT 

BAPB 





TCI - Ten test i 
dztcaa.ph 
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C03 


i4n 

14.2 

14.3 
14. *4 
1415 
1415 
1417 
1413 
14.9 

1 420 

1421 
1 H22 

1 app 

•4 » 4 »» <*3 

1424 

1425 
142S 
1427 
1423 

1429 

1430 


1436 

1437 
1439 

1439 

1440 

1441 

1442 

1443 

1444 

1445 
1445 
1447 
’448 

1449 

1450 

1451 

1452 

1453 

1454 

1455 

1456 

1457 

1458 

1459 

1460 

1461 

1462 

1463 

1464 

1465 

1466 


005444 104011 

j446 000034 

>450 005522 
005 u 52 000144 
005454 005456 


BARB: SCOPE ; SCOPE. 

I************************************************************************ 

T34: ^4 r : ROUTINE NUM8ER_34. 


005456 

005464 

005472 

005474 

005476 

005500 

0055% 

005514 

005516 

005520 


)C/ ( 


03277 
30 1002 
104003 
104011 
042777 
032777 
001401 
104QQ3 
104011 


004000 

004000 


004000 

004000 


173330 

173322 


173?% 

173300 


'35 
1 00- 
AQA 
.LIST 

I*************************************************************** ********* 

TEST THAT TOOT BITll CAN BE SET, AND CLEARED. 


; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


AQA: 


aiS 
BIT 
BNc 

ERROR 

SCOPE 

8IC 

BIT 

3EQ 

ERROR 

SCOPE 


•BITll. 3TCDT 
•BITll, 3TCDT 
>6 


•BITll, 3TC0T 
•BITll. 3TC0T 
.+4 


;SET TCDT BITll. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TOOT BITll FAILED TO SET. 

; CLEAR TCDT BITll. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; TCDT BITll FAILED TO CLEAR. 

; SCOPE. 


*«# 'V r w » | -m* V V* km * 

I************************************************************************ 


1431 

r 

wim. 

000035 

T35: 35 

; ROUTINE NUMBER 35 

4 

1432 

L 3 4 

005556 

T3b 

; AOORESS OF NEXT ROUTINE 

4 

1433 

01, 

000012 

10. 

; TEST ITERATION COUNT 

4 

1434 

005 

Q05532 

BAQA 

; SCOPE ENTRY POINT 

4 

1435 



.LIST 




005532 

005540 

005542 

005550 

005552 

005554 

005556 

005560 

005562 

005564 


005566 

005574 

005602' 

005604 

005606 

005610 

005616 

005624 

005626 

005630 

005632 

005640 


052777 
1040 IQ 
032777 
00 14Q1 
104003 
104011 

000036 

305632 

000144 

005566 


052777 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

1Q4003 

104011 

000037 

005666 

000012 

005642 


004000 

004000 


173254 

173244 


: icai 

8 AG A: 


: ******** *********************************** ********************j?******** 

[TEST THAT RESET INSTRUCTION CLEARS TCOT BITll 

; SET TCOT BITU 
ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

9R IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCDT BITll 
SCOPE. 


BAQB: 


BIS 

SRESET 

an 

BE 3 

ERROR 

SCOPE 


•BITU. 3TCDT 

•BITll. 3TCDT 
BAQB 


unvw I •Mf'VW’l km | W W« km* 

;***********#**********************************«*************#*********** 


t3b: 


; ROUTINE NUMBER 36 
; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


010000 

010000 


010000 

010000 


173220 

173212 


173176 

173170 


36 
T37 
100 . 

ARA 
.LIST 

: ****#*#**#*###•***#*#*#**###***#** *#*#********##*##*##******************* 
[TEST THAT TCOT BIT12 CAN BE SET, AND CLEARED. 

; SET fCDT BIT12. 

;SEE IF an IS SET. 

[BRANCH IF SET. 

: TCOT BIT12 FAILED TO SET. 


ARA: 


BIS 
SIT 
3NE 
ERROR 
SCOPE 
BIC 
BIT 
BEQ 
ERROR 
SCOPE 


•BIT12.3TCDT 
•BIT12.3TCDT 
,♦6 


•BITI2.3TC0T 
•BIT12.3TC0T 
. +H 


r Tl2. 


CLEAR TCDT 8V 
SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

TCDT BIT12 FAILED TO CLEAR. 
SCOPE. 


In I km • 

;*******«*************•»*************»*****•****************************« 


t37: 


3? 
T40 
10 . 

BARA 


ROUTINE NUMBER 37 
AOORESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


4 

* 

* 

* 


J#E ««► 



D2TCAA.P11 
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D03 


i*ta. 

1459 

1%9 

1470 

1472 

1473 

1474 

1475 
1475 


1500 

1501 


1514 

1515 

1516 

1517 

1518 

1519 

1520 

1521 

1522 


005642 

005650 

005652 

005650 

005662 

005664 


777 010000 173144 §ARA: 


052777 

104010 

032777 

001401 

104003 

104011 


; 4444444**44444444444444444444444444444444*4444444444444444444444444444+* 

I TEST THAT RESET INSTRUCTION CLEARS TOOT BITI2 


010000 173134 


9 ARB: 


ais 

SRESET 

BIT 

S£Q 

ERROR 

SCOPE 


r INSTRUCTION 
»3IT12,2TCDT 

IBITIE.OTCDT 

BARB 


;SET TOOT 9IT12 
; ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;9R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCDT BIT12 
; SCOPE. 


ni »«• wrf'VWI «M I WfW » I* 


1477 

005666 

000Q4Q 

T40: 

40 

; ROUTINE NUMBER 40 

1479 

005670 

305742 


T41 

; ADDRESS OF NEXT ROUTINE 

1479 

005572 

000144 


100. 

; TEST ITERATION COUNT 

1480 

005674 

005676 


ASA 

; SCOPE ENTRY POINT 

1431 




.LIST 



;***H**H+**H«*H«*»H#H**MIHH#t»H»*«t»*«»l*»***»*»***»*»*«*** 


1483 





•TEST THAT TCDT 

BIT 13 CAN BE SET 

AND CLEARED. 

1484 

005676 

052777 

020000 

173110 

ASA: BIS 

•BIT13.3TC0T 

SET TCDT BIT 13. 

1485 

005704 

032777 

020000 

173102 

SIT 

iBITi3,3TCDT 

SEE IF BIT IS SET. 

I486 

005712 

001002 



BNE 

.+6 

BRANCH IF SET. 

1487 

005714 

104003 



ERROR 


TCDT BIT 13 FAILED TO SET. 

148S 

005716 

104QI1 



SCOPE 



1489 

005720 

042777 

020000 

173066 

BIC 

*8ITl3,3rCDT 

CLEAR TCDT BIT 13. 

1490 

005726 

032777 

020000 

173060 

BIT 

IBIT13.3TCDT 

SEE IF BIT IS CLEAR. 

1491 

005734 

001401 



BEQ 

.+4 

BRANCH IF BIT IS CLEAR. 

1 1492 

005736 

1Q4003 



ERROR 


TCDT BIT13 FAILED TO CLEAR 

1 1493 

005740 

104011 



SCOPE 


SCOPE. 


; 4444444*4444444444444*444444444**44**444**444444444444444444444444444444 


1495 

005742 

000041 

T41: 

4t 

.•ROUTINE NUMBER 41 

# 

14% 

005744 

005776 


T42 

; ADDRESS OF NEXT ROUTINE 

* 

1497 

005746 

000012 


10. 

; TEST ITERATION COUNT 

# 

1498 

1499 

005750 

005752 


BABA 

.LIST 

; SCOPE ENTRY POINT 

* 


: TEST THAT RESET INSTRUCTION CLEARS TCDT BIT13 


1502 

005752 

052777 

020000 

173034 BASA: 

BIS 

iBITJ3,3TCDT ;SET TCDT 8IT13 

1 

1503 

005760 

104010 



SRESET 

; ISSUE RESET TO CLEAR BIT. 

I 

1504 

005762 

032777 

020000 

173024 

BIT 

•BIT13.3TCDT ; SEE IF BIT IS CLEAR. 

! 

1505 

QOS770 

001401 



BEQ 

BASE ;8R IF BIT IS CLEAR. 

] 

1506 

005772 

104003 



ERROR 

; RESET FAILED TO CLEAR TCDT BIT13 

1 

1507 

005774 

104011 


BA5B: 

SCOPE 

: SCOPE. 

1 

1508 




; 44444444444444*444444444444444444444444444444444444444444*44444444444444 

1509 

005776 

000042 


T42: 

42 

; ROUTINE NUMBER 42 

* ; 

1510 

006000 

006052 



T43 

: ADDRESS OF NEXT ROUTINE 

* 

1511 

006002 

000144 



100. 

•.TEST ITERATION COUNT 

♦ 

1512 

006094 

006006 



ATA 

; SCOPE ENTRY POINT 

* 

1513 





.LIST 






006006 

006014 

006022 

006024 

006026 

006030 

006036 


052777 
032777 
001002 
104003 
10401 1 
042777 
032777 


040000 

040000 


040000 

040CQC 


173000 

172772 


172756 

172750 


JEST THAT TCDT BIT14 CAN 


BIS 

BIT 

BNE 

ERROR 

SCOPE 

BIC 

BIT 


*8IT14,3TCDT 

•BIT14.3TCDT 

>6 


•BIT14.3TC0T 
•BIT 14 , 3TCDT 


\ AND CLEARED. 

SET TCDT BIT 14. 

;SEE IF BIT IS SET. 

; BRANCH IF SET. 

•TCDT-BIT14 FAILED TO SET. 

; CLEAR TCDT BITI4. 

; SEE IF BIT IS CLEAR. 


* *c % 


TCI - TCli TEST 1 
D2TCAA.P11 


1523 

006044 

0C14Q1 

1524 

C06046 

104003 

1525 

006050 

104011 

1526 



1527 

006052 

000043 

1523 

006054 

C06 106 

1523 

006056 

0000 12 

1530 

006060 

005062 

1531 



iS32 



1533 



1534 

006062 

352777 

1535 

006070 

104010 

1536 

006072 

032777 

1537 

1539 

006100 

001401 

006102 

104003 

1539 

006104 

104011 

1540 



1541 

006106 

000Q44 

1542 

006110 

006162 

1543 

. 006112 

000144 

1544 

006114 

005116 

1545 



1546 



1547 



1548 

006116 

052777 

1549 

1550 

006124 

032777 

005132 

001002 

1551 

005134 

104003 

1552 

006136 

104011 

*553 

006140 

042777 

*554 

006146 

032777 

1555 

006154 

001401 

1556 

1557 

006156 

104003 

006160 

104011 

1558 



1559 

1550 

006162 

000045 

006164 

006216 

1561 

006166 

000012 

1562 

006170 

006172 

1553 



1554 



1565 



1556 

005172 

052777 

1567 

006200 

104010 

1568 

006202 

032777 

1569 

006210 

001401 

1570 

006212 

104003 

1571 

006214 

104011 

1572 



1573 

006216 

000046 

1574 

006220 

006272 

1575 

006222 

000144 

1576 

006224 

006226 

1577 



1578 
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BEG .+4 ; BRANCH IF SIT IS CLEAR. 

ERROR ; T COT BIT1H FAILED TO CLEAR. 

SCOPE 'SCOPE. 

:**********************ft*«***«ft*ift»»#**«**ir**»§*«4«*#*#****»#»*********** 


040000 

040000 


172724 

172714 


t43: 43 

T44 

10, 

BATA 
..LIST 

;****#«******#*#»#»***********«»*»********#****#************************* 
[TEST THAT RESET INSTRUCTION CLEARS TCDT BIT14 


ROUTINE NUMBER 43 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


&ATA: 


BATB: 


BIS 

SRESET 

BIT 

BEG 

ERROR 

SCOPE 


#BIT14,3TCDT 

i8IT14,3TCDT 

BATB 


SET TCDT BIT 14 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCDT BIT14 
SCOPE. 


n i y • wvw* km « «»vv I tm» » 


t44: 


ROUTINE NUMBER 44 
ADORESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


100000 

100000 


100000 

100000 


172670 

172662 


172646 

172640 


44 
T45 
100 . 

AUA 

.LIST 

;********.******#****#*##****ftftft«*****«**************#***********4******** 

:TEST THAT TCDT 8IT15 CAN BE SET, AND CLEARED 
nUfi* nTr MntTtr -i yamt 'rr? v^nir 


SIS 
BIT 
BNE 
ERROR 
SCOPE 
8IC 
BIT 
BEG 
ERROR 
SCOPE 


•BIT15.3TCDT 

•BIT15,3TCDT 

.+6 


•BIT15.3TCDT 

»BIT15,3TCDT 

.+4 


SET TCDT BIT15. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCDT BITiS FAILED TO SET. 

'LEAR TCDT BITIS. 


100000 

100000 


172614 

172604 


;SE£ IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

;TCDT BITIS FAILED TO CLEAR, 
w : SCOPE. 

:***********»******«********»******#******»»***jHh'*****#***************** 

t45: 45 ; ROUTINE NUMBER 45 * 

T46 ; ADDRESS OF NEXT ROUTINE 4 

10. ; TEST ITERATION COUNT * 

BAUA ; SCOPE ENTRY POINT * 

.LIST 

;ft*ft*#*********4******************«**4*«**4**4*************************** 

JEST THAT RESET INSTRUCTION CLEARS TCDT BITIS 
BIS »BIT15,3TCDT ;SET TCDT BITIS 

; ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;8R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCDT 8IT15 
ynwy* w SCOPE. 

;**#«********ft*****#ft**#**ft***«***#****ft**»**«******ft*******************4 

T46: 46 ; ROUTINE NUMBER 46 * 

T47 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AVA ; SCOPE ENTRY POINT * 

.LIST 

;***»*******************************»*********** 4 **«*****»*********»***** 


: its ■ 

BAUA: 


BAUB: 


cor err 

BIT 5 tBIT15.3TCDT 

BEG BAUB 

ERROR 
SCOPE 


L — 


I 


f TCI - ' 

TCii TEST 

1 

MACY11 

27(732) 

| DZTCAA.Pll 




i 15"9 





! 1530 

005225 

052777 

000002 

172555 

! 1531 

005234 

032777 

000002 

172550 

I5ts2 

005242 

001002 



15S3 

005244 

104003 



1594 

001*245 

104011 



1595 

005250 

042777 

000002 

172534 

1335 

005255 

032777 

000002 

172525 

1537 

005254 

001401 



1539 

005255 

104003 



1539 

005270 

104011 



i .1590 





1591 

005272 

000047 



1592 

005274 

005325 



1593 

005275 

000012 



1594 

005300 

005302 



1595 





15% 





1597 





-353 

CC5302 

052777 

000002 

172502 

1539 

005310 

104010 



; 1500 

00531c: 

032777 

000002 

172472 

1501 

005320 

001 *01 



! 1502 

005322 

104003 



i 1503 

005324 

104011 



1504 





: 1505 

005325 

000050 



j 150&. 

Q0533Q 

005402 



1507 

005332 

000144 



1506 

005334 

005335 



1509 





1 1510 

j ? C 1 1 





1 0 1 JL 

j 1512 

005335 

052777 

000004 

172445 

i 1513 

005344 

032777 

000004 

172440 

} 1514 

005352 

001002 



1515 

005354 

104003 



1515 

005355 

104011 



! 1517 

005350 

042777 

000004 

172424 

| 1518 

005355 

032777 

000004 

172415 

) 1519 

005374 

001401 



1520 

005375 

104003 



! 1521 

005400 

104011 



1 1522 





’ 1523 

005402 

000051 



i 1524 

005404 

005435 



i 1525 

005405 

000012 



i 1526 

005410 

005412 



1 f 

» Jk D C * l 





; 1528 





! 1529 





S 1530 

005412 

052777 

000004 

172372 

: 1531 

005420 

104010 



1532 

005422 

032777 

000004 

172352 

< 1533 

005430 

001401 



! 1534 

005432 

104003 
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;TEST THAT TCBA BITl CAN BE SET, 
WA: BIS *8IT1,3TCBA 

BIT #BITl,aTCBA 

BNE .+5 


iBITi, 3TCBA 
*BITi,3TCBA 
.+4 


ERROR 

SCOPE 

3IC 

3IT 

3EQ 

ERROR 

SCOPE 


AND CLEAREO. 

; SET TCBA Bill. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCBA BIT! FAILED TO SET. 

; CLEAR TCBA BITl. 

; SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

; TCBA BIT! FAILED TO CLEAR. 
SCOPE. 


V* • WV W* fa* » 

:******************************#********»*******#*********«**#*****4***** 


BAVA 


; ROUTINE NUMBER 47 
.-ADDRESS OF NEXT ROUTINE 
;TEST ITERATION COUNT 
: SCOPE ENTRY POINT 


;************#»********«***»*******«*****«***«*****«********************* 
:TEST THAT RESET INSTRUCTION CLEARS TCBA BITl 


§AVA: BIS *BIT1,3TCBA ;SET TCBA BIT! 

SRESET ; ISSUE RESET TO CLEAR BIT. 

BIT *BIT1,3TCBA ; SEE IF BIT IS CLEAR. 

BEQ BAVB ;BR IF 8IT IS CLEAR. 

ERROR ; RESET FAILED TO CLEAR TCBA BITl 

BAVB: SCOPE : SCOPE. 

; ******* *********************** ********* 
t50: SO ; ROUTINE NUMBER 50 * 

T51 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AHA ; SCOPE ENTRY POINT * 

.LIST 

;*********»********************«***********«****»*«««***********»******** 
:TEST THAT TCBA BIT2 CAN BE SET, AND CLEARED. 


BIS 

SRESET 


•BIT1,3TCBA 


•BIT1.3TCBA 

BAVB 


BAVB: 


ERROR 

SCOPE 

BIC 

BIT 

BEQ 

ERROR 

SCOPE 


*BIT2,3TCBA 

•BIT2.3TCBA 

.+5 


•BIT2.3TCBA 

•BIT2.3TCBA 

.+4 


;SET TCBA BIT2. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCBA BIT2 FAILED TO SET. 

; CLEAR TCBA BIT2. 

;SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 
;TCBA BIT2 FAILED TO CLEAR. 

; SCOPE. 




T51: 51 ’ ; ROUTINE NUMBER 51 * 

T52 ; AODRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BAWA ; SCOPE ENTRY POINT * 

.LIST 

;***ft*#******ftftft*****ft«*#fttt**«ft***»*ft»**ft«ft«*********ft**********4*******» 

1 TEST THAT RESET INSTRUCTION CLEARS TCBA BIT2 
§AWA: BIS *BIT2,3TCBA ; SET TCBA BIT2 

SRESET ; ISSUE RESET TO CLEAR BIT. 

BIT #BIT2.3TCBA ;SEE IF BIT IS CLEAR. 

BEQ BAWB ;BR IF BIT IS CLEAR. 

ERROR ; RESET FAILED TO CLEAR TCBA BITS 



G03 


TCI - ' 

re 11 TEST 

i MACY11 27(7321 
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dz~:a4.pi: 




1635 

1*dJ6 

WW ; 'W *■ 

104011 

BAWB: SCOPE -SCOPE. 

:4444444444444444444444444444444i4444444444444444444444444444444444444444 

a63< 

005436 

C000S2 

TS2: 52 

; ROUTINE NUMBER 52 * 

1638 

006443 

006512 

T53 

; ADDRESS OF NEXT ROUTINE * : 

1539 

005 u 42 

000144 

1Q0. 

; TEST ITERATION COUNT 4 

1840 

006444 

005445 

AXA 

; SCOPE ENTRY POINT 4 

1541 



.LIST 

1 


1653 

1654 

1655 

1656 

1657 

1658 

1659 

1660 
1661 
1662 

1663 

1664 

1665 

1666 

1667 

1668 
1669 
1870 

1 £.■? 1 
«#* M » A 

1672 

1673 

1674 

1675 

1676 
157"/ 

1678 

1679 

1680 
1681 
1682 
1693 

1684 

1685 

1686 

1687 

1 688 

1689 

1690 


1642 

1643 
1544 
1645 
1696 
1547 
1848 

1549 

1550 
1651 


3084% 

008454 

005452 

006454 

0Q64b6 

005470 


WOl i 

006504 

008505 

005510 

005512 

005514 

006516 

006520 


005522 

005530 

005532 

0085H0 

006542 

006544 

0055% 

006550 

005552 

006554 


006555 

006564 

006572 

008574 

006575 

006600 

006606 

006614 

006616 

006620 

006622 

006624 

006626 

006630 


052777 
032777 
30 1002 
104003 
104011 
042777 
032777 
00140i 
104003 
104011 

000053 

006546 

000012 

0C6522 


0527T 

104010 

032777 

001401 

104003 

104011 

000054 

006622 

000144 

006556 


052777 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

104003 

104011 

000055 

006656 

000012 

006632 


000010 

000010 


000010 

000010 


172336 

172330 


172314 

172306 


************************************************************************ 
TEST THAT TCBA BIT3 CAN 8E SET. AND CLEARED. 


Axa 


BIS 
BIT 

arc 

ERROR 

SCOPE 

BIC 

an 

3EQ 

ERROR 

SCOPE 


#BIT3,3TCBA 
•BIT3.3TCBA 
. +6 


•BIT3.3TCBA 

SBIT3.3TCBA 

.+4 


SET TCBA BIT3. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCBA BIT3 FAILED TO SET. 

CLEAR TCBA BIT3. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 
TCBA BIT3 FAILED TO CLEAR. 

SCOPE. 


JiVVI In. | JVWI m 

: 4444444444444444444444444444444*444*44444*444444444444444444444444444444 


tS3 


S3 
T54 
10 . 
9AXA 
.LIST 


ROUTINE NUMBER S3 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


* 

* 

4 

4 


000010 

000010 


172262 

172252 


; *4444444444444444444444444444444**4*444444444444444444444444444444444444 
TEST THAT RESET INSTRUCTION CLEARS TCBA BIT3 


&AXA: BIS *BIT3,3TCBA 

SRESET 

BIT #BIT3,3TCBA 

BED BAXB 

ERROR 

BAXB: SCOPE 


SET TCBA BIT3 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCBA BIT3 
SCOPE. 


444444444444444444444444444444444444444444444444444444444444444444444444 


000020 

000020 


000020 

000020 


172226 

172220 


172204 

172176 


tSH: 54 

T55 
190. 

AYA 
.LIST 

; 444444444444444444444444444444444444444444444444444444444444444444444444 
[TEST THAT TCBA BIT4 CAN BE SET, AND CLEARED 


ROUTINE NUMBER 54 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


AYA! 


BIS 
SIT 

ere 

ERROR 

SCOPE 

BIC 

BIT 

BEQ 

ERROR 

SCOPE 


•BIT4.3TCBA 
»BIT4 3TCBA 
.+6 


.-SET TCBA BI T 4. 

;S£E IF BIT IS SET. 

; BRANCH IF SET. 

;TC8A 81 T4 FAILED TO SET. 


•BIT4.3TCBA 

iBIT4,3TCBA 

.+4 


; CLEAR TCBA BIT4. 

;SEE IF BIT IS CLEAR. 

.BRANCH IF BIT IS CLEAR. 

;TCBA BITH FAILED TO CLEAR. 

JVVI W ft SCOPE. 

; 4444444444444444444444444444*4444444X444*444444444444444444444* *44444444 

t55: 55 ; ROUTINE NUMBER 55 4 

T56 ; ADDRESS OF NEXT ROUTINE 4 

10. TEST ITERATION COUNT 4 

BAYA -.SCOPE ENTRY POINT 4 


TCI ~ TCii 
DZTCAA.Pli 


TEST 1 


1691 

1582 

1693 

1694 
1595 
1S% 
1697 
1598 

1699 

1700 

1701 

1702 

1703 

i ?nu 
«* *' urr 

1705 

1705 

1707 

1708 
1708 

i •?* n 

1711 

1712 

1713 

1714 

1715 

mb 

1717 

1718 

1719 

1720 

1721 

1722 

1723 

1724 

1725 

1 

A / CLU 

f 

a / d d 

1728 

1728 

1730 

1731 


00BB32 

005540 

00BB42 

00BB50 

305552 

Q9BB54 

00BB5B 

OOBBBO 

00BBB2 

OObBBH 


OOBBBB 
00BB74 
00B702 
00B704 
00B70B 
006710 
0057 IB 
006724 
00B726 
005730 

005732 

005734 

005736 

006740 


005742 

006750 

006752 

005760 

006762 

005764 


0527 
032777 
001002 
104003 
104011 
042777 
032777 
001401 
104003 
104011 

000057 

006766 

000012 

005742 


052777 

104010 

032777 

001401 

104003 

104011 
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H03 


0527 
104010 
032777 
001401 
104003 
104011 

00Q05B 

006732 

000144 

OOBBBB 


000020 

000020 


172152 

172142 


.LIST 

I**##*##*****##*****##******##*#*****#****************##*#*##******#*#*** 

:TEST THAT RESET INSTRUCTION CLEARS TCBA BIT4 


&AYA: BIS #BIT4,3TCBA 

SRESET 

BIT #8IT4,3TCBA 

8EQ BAYB 

ERROR 
BAYB: SCOPE 


SET TCBA BIT4 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

8R IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCBA BIT4 

SCOPE. 


kJI 1 * W • I 'Ik* * m 

:************************************************************************ 


t56: 


ROUTINE NUMBER 56 
ADORESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


000040 

000040 


000040 

000040 


17211b 

172110 


172074 

1720BB 


55 
TS7 
100 . 

A2A 

.LIST 

************************************************************************ 
TEST THAT TCBA BITS CAN BE SET, AND CLEARED. 


AzaI 


BIS 
BIT 
BNE 
ERROR 
SCOPE 
BIC 
BIT 
BEQ 
ERROR 
SCOPE 


<BIT5,3TCBA 

«BITS,3TC3A 

.+5 


SET TCBA BITS. 

SEE IF 8IT IS SET. 
BRANCH IF SET. 

TCBA BITS FAILED TO SET. 


«BIT5,3TCBA 

#BIT5,3TCBA 

.+4 


000040 

000040 


172042 

172032 


CLEAR TCBA BITS. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

TCBA BITS FAILED TO CLEAR. 

; SCOPE. 

:***#***************«******IHHI****************************************** 
tS7: 57 ; ROUTINE NUMBER 57 * 

TbO ; AODRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BAZA ; SCOPE ENTRY POINT * 

.LIST 

:************#*********»#****##******#*lHHt***#******HHHt****************** 

TEST THAT RESET INSTRUCTION CLEARS TCBA BIT5 


AAZA: 


BAZB: 


BIS 

SRESET 

BIT 

BEO 

ERROR 

SCOPE 


tBIT5,3TCBA 

tBIT5.3TCBA 

BA2B 


SET TCBA BITS. 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCBA BITS 
SCOPE. 


;ft**M*ftft*fttft**ftttftft«tftft*ft*MMft*ft***ft**tt»tt**»***ftft*ft»ftft**ft*ft*****ft«*ft**** 


: 1733 

00fe76fc 

000060 



T60: 

60 


; ROUTINE NUMBER 60 

* 

i 1734 

00677° 

007042 




161 


; ADDRESS OF NEXT ROUTINE 

* 

1735 

006772 

000144 




100. 


;TEST ITERATION COUNT 

* 

1 1736 

006774 

006776 




AA8A 


; SCOPE ENTRY POINT 

* 

i 1737 






.LIST 




j 1738 





:m***********iHHH*****#**#*#**#*******iHHt******************************* 

i 1739 





iJEST 

THAT TCBA BIT6 CAN BE SET. AND CLEARED. 


' 1740 

006776 

052777 

000100 

172006 

AABA: 

BIS 

«8ITb,3TCBA 

; SET TCBA BIT6. 


! 174 1 

007004 

032777 

000100 

172000 


BIT 

«BIT6,3TCBA 

; SEE IF BIT IS SET. 


i 1742 

007012 

001002 




BNE 

.+6 

; BRANCH IF SET. 


: 1743 

007014 

104003 




ERROR 


•TCBA BIT6 FAILED TO SET. 


j 1744 

007016 

104011 




SCOPE 




1 1745 

007020 

042777 

000100 

171764 


BIC 

tBIT6,3TCBA 

; CLEAR TCBA BITS. 


; 1746 

007026 

032777 

000100 

171756 


BIT 

DBIT6.3TCBA 

; SEE IF BIT IS CLEAR. 



TCI - TCii 
DZTCAA.Pil 


TEST 
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103 


1747 

007034 

001401 



3E0 

.+4 

; BRANCH IF BIT IS CLEAR. 

1743 

007036 

104003 



ERROR 


; TCBA BITS FAILED TO CLEAR. 

1749 

007040 

104011 



SCOPE 


: SCOPE. 

17SD 





: ft*********************************************************************** 1 

1731 

007042 

000061 



Tbl : 61 


; ROUTINE NUMBER 61 * 

1752 

007044 

007076 



T62 


; ADDRESS OF NEXT ROUTINE * 

1753 

0070% 

000012 



10. 


; TEST ITERATION COUNT * 

1754 

007050 

007052 



BAABA 


SCOPE ENTRY POINT * 

I 1735 





.LIST 



175b 





:****#«*****************«****»«****************************************** 

i *75" 





:TEST THAT RESET INSTRUCTION 

CLEARS TCBA BIT6 

' 1758 

007052 

352777 

000100 

171732 

BAABA: BIS 

*BIT6,3TCBA 

; SET TCBA BIT6 

; 1759 

007080 

104010 



SRESET 


; ISSUE RESET TO CLEAR BIT. 

1750 

007062 

032777 

000100 

171722 

BIT 

*8IT6,3TCBA 

;SEE IF BIT IS CLEAR. 

1751 

007070 

001401 



8EQ 

BAABB 

;SR IF BIT 15 CLEAR. 

1752 

007072 

104003 



ERROR 


RESET FAILED TO CLEAR TCBA BIT6 

■ 1783 

007074 

104011 



BAABB: SCOPE 


: SCOPE. i 

1764 





:*ft*****************»***#*******4**4*******ft***«****ft******************** 

1765 

007076 

000082 



T62: 62 


; ROUTINE NUMBER 62 * 

1 1788 

007100 

007152 



T63 


; ADDRESS OF NEXT ROUTINE * 

1787 

007102 

000144 



100. 


; TEST ITERATION COUNT * 

1763 

007104 

007106 



ABBA 


; SCOPE ENTRY POINT * : 

1789 





.LIST 



f 1773 





; 444444444444444444444444444444444444444444444444444444444444444444444444 

i 1^1 





:TEST THAT TCBA BIT7 CAN BE SET. AND CLEARED. 

! 1772 

0071 06 

052777 

000200 

171676 

ABBA: SIS 

iBIT7,3TCBA 

; SET TCBA BIT7. 

1773 

007114 

032777 

000200 

171670 

BIT 

#BIT7,3TCBA 

;SE£ IF BIT IS SET. 

1774 

007122 

001002 



BNE 

.+6 

; BRANCH IF SET. 

1775 

007124 

104003 



ERROR 


;TCBA BIT7 FAILED TO SET. ! 

1778 

007128 

104011 



SCOPE 


1 

| 1777 

007130 

042777 

000200 

171654 

BIC 

#BIT7, 3TCBA 

; CLEAR TC8A 3IT7. ! 

f *778 

007 IX 

032777 

000200 

171646 

BIT 

#BIT7,3TCBA 

;SEE IF BIT IS CLEAR. ! 

1779 

007144 

001401 



BEQ 

.+4 

; BRANCH IF BIT IS CLEAR. 

1730 

0071% 

104003 



ERROR 


; TCBA BIT7 FAILED TO CLEAR. 

i 1731 

007150 

104011 



SCOPE 


; SCOPE. 

1 1782 





:**4**********************«*****4********ft*************«***************** 

1783 

007152 

000X3 



T63: 63 


; ROUTINE NUMBER 63 4 ] 

! 1784 

007154 

007206 



164 


; ADDRESS OF NEXT ROUTINE 4 j 

1785 

007158 

000012 



10. 


; TEST ITERATION COUNT 4 

1788 ■ 

.007160 

007162 



BABBA 


; SCOPE ENTRY POINT 4 1 


1794 

1795 
17% 

1797 

1798 

1799 

1800 
1801 


097182 

007170 

007172 

007200 


007204 

007208 

007210 

007212 

007214 


052777 

104010 

032777 

001401 

104003 

104011 

000084 

007282 

000144 

007218 


000200 171822 &A8BA: 


.LIST 

;4444444*4444444444444444444444444v44444444444444444444444444444444444444 
:TEST THAT RESET INSTRUCTION CLEARS TCBA BIT7 


000200 171612 


BABBB 


BIS 

SRESET 

BIT 

SEQ 

ERROR 

SCOPE 


•BIT7, 3TCBA 

#BIT7,3TCBA 

BABBB 


; SET TCBA 8IT7 
; ISSUE RESET TO CLEAR BIT. 

;5EE IF BIT IS CLEAR. 

;BR IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCBA BIT7 
; SCOPE. 


unwuw« m m* WWI 4- • 

: 444444444444444444444444444444444444444444444444444444444444444444444444 


T64: 64 ; ROUTINE NUMBER 64 * 

T65 ADDRESS OF NEXT ROUTINE * 

100. ,TEST ITERATION COUNT * 

ACBA SCOPE ENTRY POINT * 

.LIST 

; 4444444444444444444444444444444444444444444444444444444444444444444444*4 



! TCI - 

TCli TEST 

1 

MACY11 

27(732) 

DZTCA A.P11 




1303 





1334 

1305 


r%p* *%<•*»-**■* 

UOC( * r t 

032777 

888388 

m 

ISOS 

0Q7232 

001002 



1307 

007234 

104003 



1303 

00723b 

104011 



1309 

Q0724Q 

042777 

000400 

171544 

1310 

00724b 

032777 

000400 

171536 

1311 

007254 

QQ14Q1 



1313 

00725b 

104003 



1813 

1314 

007260 

104011 



1315 

007262 

000065 



'wlw 

«*. wi i*2 

007264 

007316 



1317 

007266 

000012 



1313 

1519 

7 con 

0072-70 

007272 



1321 

1822 

307272 

052777 

000400 

171512 

1S23 

007300 

104010 



1324 

007302 

032777 

000400 

171502 

132*5 

007310 

001401 



132b 

007312 

104003 



1827 

f QPO 

007314 

104Q11 



: Mtili ' C*# 

1329 

0073 I 6 

000066 



1330 

007320 

007372 



1831 

007322 

000144 



1832 

007324 

007326 



1333 





1834 





1835 





1836 

C07326 

052777 

001000 

171456 

1837 

007334 

032777 

001000 

171450 

< 183b 

007342 

001002 



( 1839 

007344 

104003 



1340 

0073% 

104011 



1841 

007350 

042777 

001000 

171434 

1842 

007356 

032777 

001000 

171426 

1843 

007364 

001401 



1 IS44 

007366 

104003 



! 1845 

i % CbJX 

007370 

104011 



f IO~D 

1 1847 

007372 

000067 



i 1848 

007374 

007426 



| 1849 

007376 

000012 



! 1850 

007400 

007402 



i 1851 





| 1852 





t 1853 





i 1854 

007402 

052777 

001000 

171402 

| 1855 

007410 

104010 



! 1856 

007412 

032777 

001000 

171372 

I 1857 

007420 

001401 



1858 

007422 

104003 




J03 


TEST THAT TCBA BIT8 CAN BE SET, AND CLEARED 

ft Tf* **^r/**k.A. f fAHA mT 


• I !■» W I 

ACBA: 


BNE 

ERROR 

SCOPE 

SIC 

SIT 

BEQ 

ERROR 

SCOPE 


iiiTI: 

.+6 




MBIT8.3TCBA 
MBIT8,3TCBA 
. +4 


SET TCBA BITS. 

SEE IF 8IT IS SET. 

BRANCH IF SET. 

TCBA BIT8 FAILED TO SET. 

CLEAR TCBA BIT8. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 
TCBA BIT8 FAILED TO CLEAR. 

SCOPE. 


JVV I lb*. I w 

;ft**tft***»***t*******ft*0**t*ftftft***»*ftft*fttt***#ftftft***************ft**ftft**ft* 


T65: 65 ; ROUTINE NUMBER 65 * 

T66 ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BACBA {SCOPE ENTRY POINT * 

.LIST 

;************ft*tt*****ft*«************************«************************ 
{TEST THAT RESET INSTRUCTION CLEARS TCBA BIT8 


&ACBA: 


BACBB: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


MBIT8,3TCBA 

MBIT8,3TCBA 

BACBB 


SET TCBA BIT8 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCBA BITS 
SCOPE. 


wi IVWW • km % V* * 

: * ************************************** 


Tbb: bb {ROUTINE NUMBER bb * 

Tb7 . {AODRESS OF NEXT ROUTINE * 

1QO. {TEST ITERATION COUNT * 

ADBA {SCOPE ENTRY POINT * 

.LIST 

;****#********##*****#*#******#****************#«*********************** 
{TEST THAT TCBA BITS CAN BE SET, AND CLEARED. 

Arvf’V/S . r%rr* t Tft r r*f»-«r fs.rs/\ <■% v -rrs 


• i «*»«# « 

ftDBA: 


BIS 
BIT 
BNE 
ERROR 
SCOPE 

BIC MBITS, 3TCBA {CLEAR TCBA BIT9. 

BIT MBITS, 3TCBA ;SEE IF BIT IS CLEAR. 

BEQ .+4 {BRANCH IF BIT IS CLEAR. 

ERROR ;TC8A BITS FAILED TO CLEAR. 

SCOPE {SCOPE. 

r*****************iHHH(**#*««******^***********************jHe********** 
tb7: b7 {ROUTINE NUMBER 67 * 

T7Q • * {ADDRESS OF NEXT ROUTINE * 

10. {TEST ITERATION COUNT * 

BADBA SCOPE ENTRY POINT * 

.LIST 

;*********HHt***##**********M*#******iHf********************************** 

TEST THAT RESET INSTRUCTION CLEARS TCBA BITS 


MBITS, 3TCBA 
MBITS! 3TCBA 
. +6 


SET TCBA BITS. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCBA BITS FAILED TO SET. 


MBITS, 3TCBA 
MBITS, 3TCBA 
.+4 


6 ADBA: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 


MBITS, 3TCBA 

MBITS, 3TCBA 
SADBB 


SET TCBA BITS 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCBA BITS 
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K03 


1359 

I960 

1861 

1362 

1353 

1359 

.1365 

1856 


007424 104011 

QQ7426 QQ0Q7Q 
007430 S07502 
007 u 32 000144 
007434 007436 


BA0B8: SCOPE 'SCOPE 

:****i********#*****#****#***##*i**************************************** 


20 

; ROUTINE NUMBER 70 

T?i 

ADDRESS OF NEXT ROUTINE 

100. 

; TEST ITERATION COUNT 

AEBA 

i SCOPE ENTRY POINT 

.LIST 



;*****************#************************#********************##******* 


1B98 


1902 

1903 

1904 

1905 


1907 
l r 08 

.>,09 

1910 

1911 

1912 

1913 

1914 


1367 





:TEST THAT TCBA 

BIT10 CAN BE 

SET, AND CLEARED. 


1363 

007436 

052777 

002000 

171346 

AEBA: BIS 

#8IT10,3TCBA 

;SET TCBA BIT10. 


1869 

007444 

032777 

002000 

171340 

BIT 

#BIT10,3TCBA 

; SEE IF BIT IS SET. 


; 1370 

007452 

001002 



3NE 

.+6 

; BRANCH IF SET. 


1371 

007454 

104003 



ERROR 


;TCBA BIT10 FAILED TO SET. 


1872 

007456 

104011 



SCOPE 




1373 

007460 

042777 

002000 

171324 

BIC 

#BIT10,3TCBA 

; CLEAR TCBA BIT10. 


: 22* 

007455 

032777 

002000 

171316 

3IT 

#BIT10,3TCBA 

;SEE IF BIT IS CLEAR. 


v Q?r 

.*» W s f Zj 

0Q74 74 

001401 



BEQ 

.+4 

; BRANCH IF BIT IS CLEAR. 


1376 

007476 

104003 



ERROR 


:TCBA BIT 10 FAILED TO CLEAR. 


[ 1377 

1S78 

007500 

104011 



SCOPE* -SCOPE. 

:****#**************************4**************************************** 

1379 

007502 

000071 



T71: 71 


; ROUTINE NUMBER 71 

* 

1 1330 

007504 

007536 



172 


; ADDRESS OF NEXT ROUTINE 

* 

1881 

007506 

000012 



10. 


; TEST ITERATION COUNT 

* 

1332 

007510 

007512 



8AEBA 


; SCOPE ENTRY POINT 

* 

1383 





.LIST 




1884 





•a*********************************************************************** i 

1 1885 





:TEST THAT RESET 

INSTRUCTION CLEARS TCBA BIT10 


1986 

007512 

052777 

002000 

171272 

&AEBA: 3IS 

#8IT10,3TCBA 

; SET TCBA BIT10 


1887 

007520 

104010 



SRESET 


; ISSUE RESET TO CLEAR BIT. 


1888 

007522 

032777 

002000 

171262 

BIT 

#BIT10,3TCBA 

; SEE IF BIT IS CLEAR. 


J 1389 

007530 

001401 



BEQ 

BAEBB 

;BR IF BIT IS CLEAR. 


1S9Q 

007532 

104003 



ERROR 


; RESET FAILED TO CLEAR TCBA BIT10 


1891 

007534 

104011 



BAEBB: SCOPE 


; SCOPE. 



:****#**********HHH**********«m****#**************##******3H************ 


1393 

0075% 

000072 

T72: 

72 

; ROUTINE NUMBER 72 

* 1 

! O-GLl 

*» jfcji 

007540 

007612 


T73 

; AODRESS OF NEXT ROUTINE 

* 1 

1895 

007542 

000144 


100. 

; TEST ITERATION COUNT 

* 1 

18% 

.1897 

007544 

007546 


AFBA 

.LIST 

; SCOPE ENTRY POINT 

* i 


007552 

907564 

007556 

007570 

007576 

007604 

007606 

007610 

007612 

007614 

007616 

007620 


052777 
032777 
001002 
104003 
10401 1 
042777 
032777 
CO 1401 
104003 
104011 

000073 

007646 

000012 

007622 


004000 

004000 


004000 

004000 


171236 

171230 


171214 

171206 


;******#***#*******#***********************«*****#«******************** 
;TEST THAT TCBA BIT11 CAN BE SET, AND CLEARED. 


I WW * 

AFBA: 


BIS 
3IT 
BNE 
ERROR 
SCOPE 

BIC #BIT11,3TCBA ; CLEAR TCBA BITli. 

BIT *BIT11,3TCBA ; SEE IF BIT IS CLEAR. 

BEQ .+4 ; BRANCH IF BIT IS CLEAR. 

ERROR ;TC8A BIT11 FAILED TO CLEAR. 

SCOPE : SCOPE. 

;*********************^******»*****m****HHHHHHHHHf********************* 
T73: 73 ; ROUTINE NUMBER 73 * 

T7 4 ; AODRESS OF NEXT ROUTINE * 

i ;TEST ITERATION COUNT * 

BAFBA : SCOPE ENTRY POINT * 


#BIT1I,3TCBA 
UBITIi 3TCBA 
.+6 


SET TCBA BITli. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCBA BITli FAILED TO SET. 


UBITII, 3TCBA 
*BIT11,3TCBA 
.+4 


73 

TTlj 

i ' 
BAFBA 



Cl - TCil TEST 
ZTCAA.P11 

1 

MACY11 

27(732) 

IBIS 





IBIS 





1917 





1913 

007622 

052777 

004000 

171162 

1919 

007630 

104010 



1920 

007632 

032777 

004000 

171152 

1921 

007640 

Q014Q1 



.1922 

007642 

104003 



1923 

007644 

104011 



1924 





1925 

007646 

000074 



192a 

007650 

007722 



1927 

007652 

000144 



1928 

007654 

007656 



1929 





1930 





1931 





1932 

007656 

052777 

010000 

171126 

1933 

007664 

032777 

010000 

171120 

1934 

007672 

001002 



1935 

007674 

104003 



193b 

007676 

104011 




007700 

042777 

010000 

171104 

1939 

007706 

022777 

010000 

171076 

1939 

007714 

001401 



1940 

007716 

104003 



1941 

007720 

104011 



1942 





1943 

007722 

000075 



1944 

007724 

007756 



1945 

007726 

000012 



1946 

007730 

007732 



1947 





1948 





1949 





1950 

007732 

052777 

010000 

171052 

1951 

007740 

104010 



1952 

007742 

032777 

010000 

171042 

1953 

007750 

001401 



1954 

1955 

007752 

10H003 



007754 

104011 



195b 





t OC7 

A JmJt 

007756 

000076 



1958 

007760 

010032 



1959 

002762 

000144 



1950 

007764 

00776b 



19bl 





1%2 





1983' 





19b4 

007766 

052777 

020000 

171016 

1965 

007774 

032777 

020000 

171010 

19feb 

010002 

001002 

104003 



1967 

010004 



1968 

010006 

104011 



1969 

010010 

042777 

020000 

170774 

1970 

01001b 

032777 

020000 

170766 


L03 


.LIST 

;*#******#***#*##****#****#*##*#*********M****************************** 

TEST THAT RESET INSTRUCTION CLEARS TCBA BIT! I 


i • ww I 

&AFBA: 


BAFBB: 


BIS 

SRESET 

BIT 

3EQ 

ERROR 

SCOPE 


•BIT11.3TCBA 

#BIT11,3TCBA 

BAFBB 


t?4: 


SET TCBA BIT 1 1 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCBA BIT11 

SCOPE. 


a*********************************************************************** 


ROUTINE NUMBER 74 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


74 
T75 
100 . 

AGBA 
.LIST 

;***#*^****)HHt*******#*****##**********0******************************* 
; TEST THAT TCBA BIT12 CAN BE SET, AND CLEARED. 

; SET TCBA BIT12. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCBA BIT 12 FAILED TO SET. 


• | I 

AGBA: 


BIS 
BIT 
BNE 
ERROR 
SCOPE 
3IC 
BIT 
BEQ 
ERROR 
SCOPE 


#BIT12,3TCBA 
#BIT12 3TCBA 
+b 


#BIT12,3TCBA 
#BIT12 3TCBA 
.+4 


CLEAR TCBA BIT12. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

TCBA BIT 12 FAILED TO CLEAR. 

SCOPE. 


JWVI W m bm, • 

****iHHt******«*******H(****#********4HHm******************************* 


ROUTINE NUMBER 75 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


t75: 75 

T76 
10. 

3AGBA 
.LIST 

;*********iHHHHHHt*************#**************#)H************************** 
TEST THAT RESET INSTRUCTION CLEARS TCBA BIT12 

; SET TCBA 3IT12 
ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

; BR IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCBA BIT12 
8AGBB: SCOPE : SCOPE. 


IaGBA: 


CIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


#BIT12,3TCBA 

#BIT12,3TCBA 

BAGBB 


t?b: 7b 

T77 
100 . 

AH3A 
.LIST 

;*********«HHtt***********)Ht**********JHf********************************* 
.TEST THAT TCBA BIT13 CAN BE SET, AND CLEARED. 

)AA l*s V <•* ..MW « A AWAA 0K ' mm mm mm mm m. jm mm. m » 


; ROUTINE NUMBER 7b 
; ADDRESS OF NEXT ROUTINE 
;T£ST ITERATION COUNT 
; SCOPE ENTRY POINT 


AhBA: 


BIS 
BIT 
BNE 
ERROR 
scof: 

BIC 

BIT 


#BIT13,3TCBA 
H3IT13 3TCBA 
.+b 


#BIT13,3TCBA 

»BIT13,3TCBA 


; SET TCBA BIT13. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCBA BIT 13 FAILED TO SET. 

; CLEAR TCBA BIT13. 

; SEE IF BIT IS CLEAR. 


TCI - TCli TEST 

Dzrcmpn 
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MQ3 


1971 

1972 

1973 

1974 

1975 


010024 

01002b 

010030 


0014Q1 

104003 

104011 


010032 00007 


BEQ .+4 ; BRANCH IF BIT IS CLEAR. 

ERROR ;TC8A BIT13 FAILED TO CLEAR. 

SCOPE ’ SCOPF . 

:****#*******ih*#*#**************I^«************************************* 


1978 

010034 

OlOObo 



T 1 00 


{ADDRESS OF NEXT ROUTINE * 

1977 

010038 

000012 



10. 


{TEST ITERATION COUNT * i 

1978 

010040 

010042 



BAH8A 


SCOPE ENTRY POINT * 

1979 





.LIST 



19SG 





;**************#****#**#******#*#******************#********************* 

198 1 





:TEST THAT RESET INSTRUCTION CLEARS TCBA BIT13 

t qcp 

010042 

052777 

020300 

170742 

BAHBA: BIS 

HBIT13, 3TCBA 

;SET TCBA BIT13 

1983 

010050 

104010 



SRESET 


{ISSUE RESET TO CLEAR BIT. 

1984 

010052 

032777 

020000 

170732 

BIT 

#BIT13,3TCBA 

;SEE IF BIT IS CLEAR. 

1985 

0.10080 

001401 



BEQ 

BAHBB 

;BR IF BIT IS CLEAR. 

1988 

010082 

104003 



ERROR 


{RESET FAILED TO CLEAR TCBA BIT13 

1987 

010084 

104011 



BAHBB: SCOPE 


.•SCOPE. 

1988 





:#«********************************###********************************** 

1989 

010088 

000100 



TlOO: 100 


{ROUTINE NUMBER 100 * 

1990 

010070 

010142 



T101 


{ADDRESS OF NEXT ROUTINE * 

1991 

010072 

000144 



100. 


{TEST ITERATION COUNT * 

1992 

010074 

010078 



AIBA 


{SCOPE ENTRY POINT * i 

1993 





.LIST 



1994 





;****#****************#****#***************#************4**************** 

1995 





:TEST THAT TCBA BIT14 CAN BE 

SET, AND CLEARED. 

1998 

010078 

052777 

040000 

17Q708 

AIBA: BIS 

#BIT14,3TCBA 

SET TCBA BIT 14 . 

1997 

010104 

032777 

040000 

170700 

BIT 

UBIT14, 3TCBA 

; SEE IF BIT IS SET. 

1998 

010112 

001002 



BNE 

.+8 

; BRANCH IF SET. 

1999 

010114 

104003 



ERROR 


;TCBA BIT 14 FAILED TO SET. 

2000 

010118 

104011 



SCOPE 



2001 

010120 

042777 

040000 

170884 

eic 

#BITI4,3TCBA 

{CLEAR TCBA BIT14. 

2002 

010128 

032777 

040000 

170658 

BIT 

•BITI4 3TCBA- 

•• ISEE IF BIT IS CLEAR. 

2003 

010134 

001401 



BEQ 

.+4 

{BRANCH Ir BIT IS CLEAR. 

2'JOH 

010138 

104003 



ERROR 


; TCBA BITI4 FAILED TO CLEAR. 

2205 

010140 

104011 



SCOPE 


SCOPE. 

2008 





:»*ft*ftft*«***»ft****Sft*ft*******ftft**««****»*ft*ft*ftft*ftftfttt*««*Mftm*«ft««****** 

2007 

010142 

000101 



T101: 101 


; ROUTINE NUMBER 101 * 

2008 

010144 

010178 



T1Q2 


{ADDRESS OF NEXT ROUTINE * 

2009 

0)0148 

000012 



10. 


{TEST ITERATION COUNT * 

2010 

0*0150 

010152 



BAIBA 


{SCOPE ENTRY POINT * 


2UI1 

2012 

2013 

2014 

2015 
201b 


2018 

2019 

2020 
2021 
2022 

2023 

2024 

2025 
202b 


010152 

010150 

010182 

010170 

010172 

010174 

01017b 

010200 

010202 

010204 


052777 

104010 

032777 

001401 

104003 

104011 


040000 170532 &AIBA: 


.LIST 

;»***»ft*)Ht**m#ft******ft******ft***»*********ft*«*tt************************ 
{TEST THAT RESET INSTRUCTION CLEARS TC8A BIT14 


7 040000 170822 


BAIBB: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


tBITl4,3TCBA 

»BIT14 f 3TCBA 

BAIBB 


; SET TCBA 8IT14 

.ISSUE RESET TO CLEAR BIT. 

-.SEE IF BIT IS CLEAR. 

;8R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCBA BIT14 
;SCOPE. 


000102 

010252 

000144 

010208 


*«*ft*ft*#»»*****m**jHt*#**********tt*******»*****»*********************** 


tl02: 102 ; ROUTINE NUMBER 102 * 

T 103 {ADDRESS OF NEXT ROUTINE * 

100. TEST ITERATION COUNT * 

AJBA ; SCOPE ENTRY POINT * 

.LIST 

;**»«********»****«***********************************************»***»** 


J 


TCI - TCI! TEST 
D2TCAA.Pl 1 

1 

MACY11 

27(732) 

an 

w* * 





2029 

010205 

0Sc!??7 

100000 

170575 

2029 

010214 

032777 

100000 

170S70 

2030 

010222 

001002 



2031 

0.10224 

104003 



2032 

01Q2?& 

104011 



2033 

010230 

042777 

100000 

1705S4 

2034 

010235 

032777 

100000 

170548 

2035 

2035 

oi§f% 

001401 

104003 



2037 

0.10250 

104011 



cV*33 





2039 

010252 

oooin 



2>0 

010254 

010305 



20-1 

010255 

000012 




010250 

010252 



3 CiLL 7S> 





2044 





204S 





£C% 

010252 

052777 

104010 

100000 

170522 

2C4'7 

010270 



2048 

QlGc/c 

032777 

100000 

170512 

2049 

010300 

001401 



2050 

010302 

1040C3 



205 1 

010304 

104011 



2052 





2053 

010305 

900104 



2054 

010310 

010352 



2055 

010312 

Q00144 



2058 

010314 

010315 



2057 





2058 





2059 





2050 

010315 

052777 

000001 

170484 

20b 1 

Q 10324 

032777 

000001 

170458 

2052 

010332 

001002 



2053 

010334 

104003 



2054 

010335 

104011 



2055 

010340 

042777 ' 

0U0001 

170442 

2055 

010345 

032777 

000001 

170434 

OOP 7 

010354 

001401 



2058 

010355 

104003 



2059 

910350 

104011 



2070 





2071 

010352 

000105 



2072 

010354 

010415 



2073 

010355 

000012 



2074 
£075 

2075 

2077 

2078 

010370 

010372 



010372 

052777 

000001 

170410 

2079 

010400 

104010 


170400 

2080 

010402 

032777 

000001 

2081 

0.10410 

001401 



,2082 

010412 

104003 




\ 
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N03 


:TEST 

AJ8A: 


IMAf TCBA BIT15 CAN BE SET, AND CLEARED 


SIS 
SIT 
SNE 
ERROR 
SCOPE 
SIC 
SIT 
BEG 
ERROR 
SCOPE 


i8IT15,3TC8A 
•BIT15 3TCBA 
.+8 


#BIT15,3TCBA 

#BIT1S,3TCBA 

.+4 


;SET TCBA BIT15. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCBA BIT15 FAILED TO SET. 


IS CLEAR. 


; CLEAR CdA BIT1S. 

•SEE IF Bi 

•BRANCH II BIT IS CLEAR. 

TCBA BIT15 FAILED TO CLEAR. 

; SCOPE. 


ti03: 


*******»*»*H«*t***»*«*Hm«*H»i!f***mmf**B«H**m«**«««« 

* 
* 
* 
* 


1 03 

T 1 04 

10 . 

9AJBA 
.LIST 

************************************************************************ 
TEST THAT RESET INSTRUCTION CLEARS TCBA BIT15 


; ROUTINE NUMBER 103 
; AOORESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


I-IAJBA: 


SIS 
SRESET 
Bt T 
BE- 
ERROR 
SCC°E 


»BIT15,3TCBA 


»BIT15,aTCBA 

BAJBB 


; SET TC8A BIT15 
ISSUE RESET TO CLEAR BIT. 

;S£E IF BIT IS CLEAR. 

;BR IF BIT IS CLEAR. 

, RESET FAILED TO CLEAR TCBA BIT15 

B° T BB : SCO°E ; SCOPE. 

; t********************************************************************* 

tlu4: 104 ; ROUTINE NUMBER 104 * 

T 105 ; AOORESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AKBA ; SCOPE ENTRY POINT * 

.LIST 

;*ft#****Xft**k ***************************************** ******************* 

■TEST THAT TCWC BHO CAN BE SET, AND CLEAREO. 


AKBA: 


SIS 
BIT 
8NE 
ERROR 
SCOPE 
SIC 
BIT 
BEQ 
ERROR 
SCOPE 


#BIT0,3TCWC 
#BIT0,3TCWC 
.+8 


iBIT0,3TCWC 
IBIT0,3TCWC 
. +4 


; SET TCWC BITO. 

;SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCWC BITO FAILED TO SET. 

; CLEAR TCWC BITO. 

;SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; TCWC BITO FAILED TO CLEAR. 
; SCOPE. 


************************************************************************ 


tlOS: 105 

T iOo 

10 . 

BAKBA 
.LIST 

: ********** * ********** '**x*********************************************** 


ROUTINE NUMBER 105 
AOORESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


TEST THAT RESET INSTRUCTION CLEARS TCWC BITO 


« * * 
BAKBA: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 


#BIT0,3TCWC 

#BIT0,3TCUC 

BAKBB 


SET TCWC BITO 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCWC BITO 


L 


TO 


- TC11 
dztcaa.pii 


r £ST 


>rs>4 

**W'V ” 

2035 

3f)CC 

w wvv 

2087 


** 4 
%»W J 

£030 

DOC* 

4 » W • * 

£03? 

V"Ss 


n t ^ « 

W : 4 W* * 4 


4 iOHOil 


£034 

A095 

£0% 

£037 

£0% 

£033 

£100 

?'*i' 

*■ *. W 4 

C *. i#C 

2103 

£104 

PICS. 

£106 

£.07 

£108 

£109 

2110 
3 ! • ! 

lap, fa »H t fa 

£li£ 
2113 
£114 
£1 IS 

£118 
» 1 *+ 
Lai 1 ' 

£118 
O' iQ 
C £7 

£120 

£ 1£1 

2 * 
*.cc 

2123 

£124 

£1£S 

2128 

2127 

£128 

£1£9 

2130 

2131 

2132 

2133 

IS 

2138 

2137 

2138 


010418 

,VN5'1 
010 J £2 
Cl 0424 


010428 
010434 
01043 
a: 044 
01044b 
01050 
OIOSS 
010484 
01088 
C 10470 

01CH72 

C1C474 

C1CH76 

31C50C 


010502 
010510 
0105 12 
010520 
C 10522 
010524 

Cl 0528. 

fM rN-pn 

010532 

010534 


01C53S 

010544 

010552 

010554 

0105% 

010580 

010588 

010574 

010578 

01CS800 

0IC802 

010804 

010808 

010810 
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B04 


000108 
01 0473 
000144 
010438 


3$2 ? 

'•j? 


001002 

104Q03 

104011 

042777 

032777 

001401 

104003 

104011 

000107 

010S28 

000012 

C1C5C2 


052777 

104010 

032777 

001401 

104QC3 

104011 

000110 
010802 
000144 
01 0538 


052777 

032777 

0C1CC2 

104003 

104011 

042777 

032777 

001401 

10H0C3 

104011 

000111 

010838 

000012 

C10812 


oooc 

oooc 


22 

22 


000002 

000002 


000002 

000002 


000004 

000004 


000004 

000004 


170300 

170270 


170244 

170238 


170222 

170214 


BAKBB: SCOPE 'SCOPE, 

•**m**H*M*l«*H»HHH**«»iH«<»HIH*H**H**IIH»**«*H*HH»H 
1 108: 


10b 

; ROUTINE NUMBER 108 


II 07 

; ADDRESS OF NEXT ROUTINE 

# 

100. 

;’EST ITERATION COUNT 

* 

ALBA 

; SCOPE ENTRY POINT 

# 

• LIST 




170354 

170346 


170332 

170324 


TEST THAT TCMC BIT] CAN BE SET, AND CLEARED. 


AlBA: 


BIS 
BIT 
3NE 
ERROR 

SCOPE 
a !C 


•3ITl,3TCUC 
•BIT1.0TCWC 
+6 


; SET TCWC BIT! 

; SEE IF BIT IS 
; BRANCH IF SET 
: TCWC BIT l FAIl 


SET. 

ED TO SET. 


9 tt 

A * 

BEQ 

ERROR 

SCOPE 


•Bin.OTCUC 
•BIT1.3TCUC 
. ♦4 


am. 

IS CwEAR. 

IT IS CLEAR. 
AILED TO CLEAR. 


; Clear tcuc 

; SEE F BIT 
; BRANCH IF 

mwe Bui 
; SCOPE. 

t 107: 107 ; ROUTINE NUMBER 107 * 

r 110 ; AOORESS OF NEXT ROUTINE ♦ 

IQ. ; r £ST ITERATION COUNT ♦ 

BALSA ; SCOPE ENTRY POINT * 

.LIST 

• t*#***ft*»fr#«ftfft*t**#ft**ft»ttt*t##»*«««*»**fttft#*ftft*ft****#**t*t 4 ****ft****ft* 

•TEST THmT RESET INSTRUCTION CLEARS TCWC 


i « » 

BALBA: 


BALBB: 


BIS 
SRESET 

BIT 

BEG 

ERROR 

SCOPE 


100 . 

A?® A 


•8ITi,3TCMC 


01 T 1 


•Bill, 31 
BALBB 


cue 


BIT. 


; SET TCWC BIT! 

; ISSUE RESET TO CLEAR 
; SEE IF BIT 13 CLEAR. 

;BR IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCWC BITl 
: SCOPE . 

1 1 10: HO : ROUTINE NUMBER no 

; AOORESS OF NEXT ROUTINE * 

; TEST ITERATION COUNT * 

; SCOPE ENTRY POINT * 


.LIST 

: TEST THAT TCWC BIT2 CAN BE SET, AND C.EARE0. 


AM8A: 


BIS 
BIT 

BTC 

ERROR 

SCOPE 

BIC 

BIT 

BEO 

ERROR 

SCOPE 


•BIT2.3TCWC 

•8IT2.3TCWC 

.♦6 


;SET TCWC 8IT2, 

;SEE. IF BIT IS SET. 

; BRANCH IF SET, 

; TCWC BIT2 FAILED TO SET. 


•BIT2.3TCWC 

»BIT2,3TCWC 

.♦4 


; CLEAR TCWC BITS. 

;$££ IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

;TCjWC 8IT2 FAILED TO CLEAR. 

; SCOPE. 

till: Hi ; ROUTINE NUMBER 111 ♦ 

TU2 ; ADDRESS OF NEXT ROUTINE * 

10. -TEST ITERATION COUNT * 

BAMBA ; SCOPE ENTRY POINT * 


t 



TC: 


%n 


i w J 


DZTCAA.PU 


TEST 


2139 
2; HQ 

*N» * ^ 4 *. 

2143 

2-44 

11 % 

2>~ 

21% 

21% 

c .1 bQ 
3 * r 5 

2.1 52 
2.1 S3 


'4 


3 : 1 

w A - 

3 - C 


21% 
2 1ST 
215S 
2139 
2 ISO 
2lbl 
2„S? 
21 S3 

2»64 

2185 

21% 

2167 

2188 

2189 


/? 1 
f w 

?! 


2J 
3 1 
21^2 
2173 

3* “*4 

#*•* «h ,J * 

2175 

21% 

( / 

21% 

?'79 

2180 

2181 

2182 

2183 

218^ 

2185: 

2198 

2187 

2188 

2189 

2190 

2191 

2192 

2193 

2194 


3109.2 

310820 

01082? 

010830 

010832 

010834 

010838 

010840 

0X0842 

010844 


010848 

OlOSSj 

010882 

010684 

0^0666 

010870 

01C878 

010704 

0107Q8 

010710 

01071? 

010714 

010718 

010720 


010722 

010730 

010732 

01T r '0 

010742 

013744 


010748 

010750 

010752 

010754 


010758 

010784 

010772 

010774 

010778 

011000 

011006 
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C04 


052777 

104QIQ 

032777 

001401 

104003 

104011 

000112 
310712 
300144 
01 0848 


05274? 

0327% 


000004 

000004 


170170 

170180 


1CN0Q3 

104011 

042777 

032777 

001401 

104003 

104011 

000113 

010748 

000012 

010722 


000010 

000010 


000010 

000010 


170134 

170126 


170112 

170104 


0000 10 
000010 


0527 < 
104010 
032777 
001401 
104G03 
104011 

0CC114 

011022 

000144 

010756 


052777 000020 
032777 000020 
001002 
104003 
104011 

042777 000020 
032777 000020 


170060 

170050 


170024 

170018 


170002 

167774 


.LIST 

;*«**t*ftft***ft*#*#**ft*ft*##*ft#*t*»4**«*»*«*«ftft«#t*#*»ft********************* 

: TEST THAT RESET INSTRUCTION CLEARS TCUC RIT2 
§AMBA: BIS *8IT2,3TCUC ;5ET TCUC BITS 

SRESET ; ISSUE RESET TO CLEAR BIT. 

BIT *8IT2,3TCWC ;S EE IF 8IT IS CLEAR. 

9EQ BAflBB ;8R IF BIT IS CLEAR. 

ERROR ; RESET FAILED TO CLEAR TCUC BITS 

BAflBB: SCOPE ’SCOPE. 

;4**t#ft**»***#*«******ft**#«##*#*it**««**«ft***t*ft#**ft#****ft****»******«*** 

t 1 12 : 112 

T 1 13 

100 . 

AN8A 
.LIST 

;*«*tt«*******t»**#«#«***ft#«ft*##**<K»***ft*ft#«****ft******ft****#tt***#4**»* 

.TEST THAT TCUC BIT3 CAN BE SET, AND CLEARED. 


; ROUTINE NUMBER 112 
; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


* * * 

ANBA: 


BIS 
BIT 
9f€ 
ERROR 
SCOPE 
BIC 
BIT 
BEQ 
ERROR 
SCOPE 


•8IT3,3TCWC 

«8IT3,3TCUC 

.♦6 


•8IT3,3TCWC 

•BIT3.3TCUC 

.♦4 


j SET TCUC BIT3. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCUC BIT3 FAILEO TO SET. 

; CLEAR TCUC 8IT3. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF SIT IS CLEAR. 

; TCUC BIT3 FAILED TO CLEAR. 

; SCOPE. 


'ft** % ft* a 

;****«*******«ft****ft***ft**#fti*t*ft*4**»#4*i*4**#*««#*ftt**»*#4************* 


t i 13: 113 

Ti 14 

10 . 

8ANBA 

.LIST 

TEST THAT RESET INSTRUCTION CLEARS TCUC 8IT3 


; ROUTINE NUMBER 113 
; ADDRESS OF NEXT ROUTINE 
;TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


BIS 

‘RESET 

BIT 

BEQ 

ERROR 

SCOPE 


•BIT3.3TCUC 


•BIT3.3TCUC 

BhNBB 


i SET TCUC BIT3 
ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;8R IF BIT IS CLEAR. 

i RESET FAILED TO CLEAR TCUC BIT3 

BAN8B: SCOPE : SCOPE. 

TI 14; 114 ; ROUTINE NUMBER 114 * 

T 1 15 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

A08A ; SCOPE ENTRY POINT * 

.LIST 

;TES: THAT TCUC BIT4 CAN BE SET, AND CLEAREO. 


AOBA: 


BIS 
BIT 
BNE 
ERROR 
SCOPE 
BIC 
BIT 


•BIT4.3TCUC 
•BIT4 3TCUC 


I8IT4,3TCUC 

•BIT4.3TCUC 


; SET TCUC BIT4. 

; SEE IF BIT IS SET. 
{BRANCH IF SET. 

;TCUC BIT4 FAILED TO SET. 

; CLEAR TCUC BIT4. 

; SEE IF BIT IS CLEAR. 


m m J#c *t 



TCI - TCil TEST 
DZTCAA.Pli 


219S 011014 


.96 

3 ! 

^4 1* 

2198 

2199 

2200 
2201 
2202 

2203 

2204 
apnc 

2206 

2207 

2208 
2209 

3310 

4s»»4to** Jkh «W§ 

2211 
331 p 

4an '*■■» 4 mm 

33 1 3 

*n». 4 » A wl 

2214 

2215 
221b 

33i *» 
33*0 

2219 

2220 
2221 


2223 

2224 

2225 
222b 


2228 

2229 

2230 

2231 

2232 

2233 

2234 


223b 

2237 


2239 

2240 

2241 

2242 

2243 

2244 

2245 
224fc 

2247 

2248 

2249 

2250 


01101b 

011020 

011022 
011024 
01102b 
01 1030 


011032 

011040 

011042 

011050 

011052 

011054 

01105b 

QllObO 

Quota 

01 1084 


01108b 

011074 

011102 

011104 

01110b 

011110 

01111b 

011124 

01112b 

011130 

011132 

011134 

01113b 

011140 


011142 

011150 

011152 

OlllbO 

011182 

011184 

01 1188 
011170 
011172 
011174 
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D04 


001401 

104003 

104011 

000115 

011058 

000012 

011032 


BEQ 
ERROR 
SCOPE 


>4 


BRANCH IF 9 I T IS CLEAR. 
TCWC BIT4 FAILED TO CLEAR. 
SCOPE. 


•iVWl fa. | » 

:#ft**t#*****ft*#«i»*********#***#*«ft**#**#»*»#»*****ftft***##*******«******4 


1 1 15: 


052777 

104010 

032777 

0014Q1 

104003 

104011 

000118 
011132 
000144 
01 1088 


052777 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

104003 

104011 

000117 

011188 

000012 

011142 


052777 

104010 

032777 

001401 

104003 

104011 

1X301 20 
011242 
00CI44 
Oil 178 


000020 

000020 


187750 

187740 


115 
Tilt 
10 . 

BAOBA 
.LIST * 

;*****«*****»**«**»***#*«*»#*»**» t*************************************** 

;TEST THAT RESET INSTRUCTION CLEARS TCWC 3IT4 


ROUTINE NUMBER 115 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


i * * 

6A0BA: 


8A0BB: 


BIS 

3RESET 

BIT 

3EQ 

ERROR 

SCOPE 


•BIT4.3TCWC 

*8IT4,3TCWC 

BAOBB 


SET TCWC 8IT4 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCWC BIT4 
SCOPE.. 


wnvww« jvvi w j wvv * 


tllb: lib 

T] 17 
100 . 
APBA 
.LIST 


; ROUTINE NUMBER 118 
; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


000040 

000040 


000040 

000040 


167714 

167706 


187672 

167664 


Ap 


THAT TCWC BITS CAN BE SET, AND CLEARED. 


BIS 
BIT 
BNE 
ERROR 
SCOPE 

aic 

BIT 

BEQ 

ERROR 

SCOPE 


•BIT5.3TCWC 
•BITS.3TCWC 
. +6 


•BIT5.3TCWC 

#BIT5.3TCWC 

.+4 


SET TCWC BITS. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCWC BITS FAILED TO SET. 

CLEAR TCWC BITS. 

SEE IF BIT IS CLEAR. 
BRANCH IF BIT IS CLEAR. 
TCWC BITS FAILED TO CLEAR. 

5C0PE. 


*.# W W > fc. a W a 

;******«******************#**ftt#4**»***«*»*****ft*******ft***************** 


000040 

000040 


167640 

187830 


tll7: 117 

T 120 

10 . 

8AP8A 
.LIST 

;*ft**##«***»**##**«***#ft*ft***#*ft*ft********444**#***ft*»**********»******** 

[TEST THAT RESET INSTRUCTION CLEARS TCWC BITS 


ROUTINE NUMBER 117 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


§APBA: 


BIS 

SRESET 
BIT 
BEQ 
ERROR 
BAPBB: SCOPE 


•BITS.3TCWC 


iBIT5,3TCWC 

BAPBB 


SET TCWC BIT5 
ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCWC BITS 

rvi WW • w»VVI In. .SCOPE. 

t 120: I2H ; ROUTINE NUMBER 120 * 

T121 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AQBA ; SCOPE ENTRY POINT * 

.LIST 

;**#*###***#**0*******0**0*M*JK*************0*******************£*** 



TCI - 

TC11 TEST 

i 

MACYil 

27(732) 

1 DrCAA.Pil 




3 'DC 1 

| <wl 4 

DDCD 

QUITS 

052??? 

000100 

167604 

2253 

011204 

Uvtu t t 

000100 

167576 

2259 

011212 

001002 



J 33CC 

I %#>. "J 

011214 

104003 



2256 

011216 

104011 



2257 

011220 

04277? 

0001 00 

167562 

2558 

011226 

03277? 

000100 

167554 

2259 

011234 

001401 



2260 

011236 

104003 




011240 

104011 



2262 






011242 

000121 



2269 

011244 

011276 



2265 

011246 

000012 



ppcc 

f '%m» ml- 

I DDL? 

011250 

011252 



2268 





22b9 





2270 

011252 

05277? 

000100 

167530 

3D?) 

011260 

104010 



2272 

01 1262 

032777 

000100 

167520 

2273 

011270 

001401 



2279 

011272 

104003 



l ddtt: 

011274 

104011 



2276 





227? 

011276 

011300 

000122 



2279 

011352 



22"9 

011302 

000144 



2230 

011304 

011306 



2281 





22 82 





2283 





. 2299 

011306 

052777 

000200 

167474 

229S 

011314 

032777 

000200 

167466 

2286 

011322 

001002 



2287 

011329 

104003 



! 2288 

011326 

104011 



2289 

011330 

042777 

000200 

167452 

2290 

011336 

032777 

000200 

167444 

2291 

011394 

001401 

104003 



2292 

011346 



2293 

011350 

104011 



2299 





1 2295 

011352 

000123 



i 22% 

011354 

011406 



2297 

01 1356 

000012 



2298 

011360 

011362 




2299 

2300 

2301 

2302 

2303 
2309 
2305 
2302 
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E04 


: TEST 
AQBA: 


HAT TCWC BITS CAN BE SET, 


BIS 

BIT 

8NC 

ERROR 

SCOPE 


ERROR 

SCOPE 


MBITS, 3TCWC 
MBITS, 3TCWC 
.*& 


MBIT6.3TCWC 
MBITS. 2TCWC 
. +4 


AND CLEARED. 

SET TCWC BITS. 

§&& ra. aT - 

TCWC BITS FAILED TO SET. 

CLEAR TCWC BITS. 

SEE IF BIT IS CLEAR. 
BRANCH IF BIT IS CLEAR. 
TCWC BITS FAILED TO CLEAR. 

SCOPE. 


****ftft**ft***ft*************»*ft*t4#***»***ft»****************************** 


ti21: 


; ROUTINE NUMBER 121 
T122 ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

8AQ8A ; SCOPE ENTRY POINT * 

.LIST 

;**»#»**»***»**********#******«**************»**«*»********************** 
:TEST THAT RESET INSTRUCTION CLEARS TCWC BITS 


ft ' bmmf 7 

&AQ8A: 


BAOBB: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


MBITS, 3TCWC 

MBITS, 3TCWC 
3AQBB 


; SET TCWC BITS 
; ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;BR IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCWC BITS 
; SCOPE. 


»4HHt**«*4**4*t##**ft***#**«*4HU#*******#«*»4****ft***ft*«*#**ft*4*ft********* 


t 122: 122 ; ROUTINE NUMBER 122 4 

T123 ; ADDRESS OF NEXT ROUTINE 4 

100. ; TEST ITERATION COUNT 4 

ARBA ; SCOPE ENTRY POINT 4 

.LIST 

; 444444444444444444444444444444444444444444444444444444444444444444444444 
:TEST THAT TCWC BIT? CAN BE SET, AND CLEARED. 


; ROUTINE NUMBER 122 
; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


ARBA: 


BIS 

BIT 

BNE 

ERROR 

SCOPE 

SIC 

BIT 

BEQ 

ERROR 

SCOPE 


•BIT7,3TCWC 
MBIT? 3TCWC 
.+6 


•BIT7.3TCWC 

MBIT7.3TCWC 

.+4 


;SET TCWC BIT?. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCWC BIT? FAILED TO SET. 

; CLEAR TCWC BIT?. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF 8IT IS CLEAR. 
;TCWC BIT? FAILED TO CLEAR. 
: SCOPE. 


bm | * 

444444444444444444444444444444444444444444444444444444444444444444444444 


Cl 1362 
011370 
011372 
011900 
011402 


052777 

109010 

032777 

001901 

109003 


00020C 167420 
000200 1S7910 


t 123: 123 ; ROUTINE NUMBER 123 4 

T124 ; ADDRESS OF NEXT ROUTINE 4 

10. ; TEST ITERATION COUNT 4 

BARBA ; SCOPE ENTRY POINT 4 

.LIST 

; 444444444444444444444444444444444444444444444444444444444444444444444444 
:TEST THAT RESET INSTRUCTION CLEARS TCWC BIT? 

&ARBA: BIS MBIT7,3TCWC ;SET TCWC BIT? 

SRESET ; ISSUE RESET TO CLEAR BIT. 

BIT MBIT7.3TCWC ; SEE IF BIT IS CLEAR. 

BEQ BARBB ;BR IF BIT IS CLEAR. 

ERROR -.RESET FAILED TO CLEAR TCWC BIT? 


- TC11 
'AA.Pil 


5309 

2310 

2311 

3"5f 3 

2313 

2314 

2315 
2315 
231? 
2313 
2319 
232Q 

232i 

2323 

2324 

2325 
2325 
232? 
2323 
2329 

3T3H 

fe»fe*Wfei 

2331 

2332 

2333 

2334 

2335 
2335 

2337 

2338 

2339 

2340 

2341 

2342 


2345 

2345 

2347 

2348 


2350 

2351 

2352 

2353 

2354 


011404 

011405 

011410 

01i u 12 

011414 


011415 

011424 

011432 

011434 

Q11435 

011440 

011445 

011454 

011455 

Q114B0 

011452 
011454 
01 1455 
011470 


011472 

011500 

011502 

011510 

011512 

011514 

011515 

011520 

011522 

011524 


011525 

011534 

011542 

011544 

011545 

011550 

011555 

011554 

011555 

011570 

011572 
011574 
011575 
Cl 1500 
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F04 


104011 


000124 

011452 

000144 

011415 


use/ t f 
001002 
104003 
104011 
042777 
032777 
001401 
104003 
104011 

000125 

011515 

000012 

011472 


052777 

104010 

032777 

001401 

104003 

104011 

000125 

011572 

000144 

011525 


05277? 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

104003 

104011 

000127 

011525 

000012 

011502 


BARBB: SCOPE ; SCOPE. 

: *4*4**444444***44**4*4***4444**4444444444444444*44*4*44*4**4*44**4*44444 


tl24: 124 ; ROUTINE NUMBER 124 * 

T 125 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

ASBA ; SCOPE ENTRY POINT * 

.LIST 

;******4444*****4***************444444444444*4*444*********4*4*****4**4*4 

:TEST THAT TCWC BIT8 CAN BE SET, AND CLEARED. 


ROUTINE NUMBER 124 
ADDRESS OF NEXT ROUTINE 
T EST ITERATION COUNT 
SCOPE ENTRY POINT 


000400 

000400 


000400 

000400 


157354 

157355 


157342 

157334 


l * few * 

ASBA: 


BIS 

BIT 

3NE 

ERROR 

SCOPE 

BIC 

9IT 

BEQ 

ERROR 

SCOPE 


»BIT8,3TCWC 

#BIT8,3TCWC 

.+5 


«BIT8,3TCWC 

iBIT8,3TCWC 

.44 


; SET TCWC BITS. ■ 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCWC BITS FAILED TO SET. 

; CLEAR TCWC BITS. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; TCWC BITS FAILED TO CLEAR. 
; SCOPE. 


*44***44444****44444444444*******4444444444444**44*********4*4*44*4***** 


000400 157310 &ASBA: 


1 125 : 125 ; ROUTINE NUMBER 125 * 

T 125 ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT 4 

BASBA ; SCOPE ENTRY POINT 4 

.LIST 

;*«*****44****************«******44*44*****44*******************»******** 

1TE5T THAT RESET INSTRUCTION CLEARS TCWC BITS 


000400 157300 


BASBB: 


BIS 

SRESET 

BIT 

BEG 

ERROR 

SCOPE 


•8IT3,3TCWC 

»BIT8,3TCWC 

BASBB 


SET TCWC BIT8 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

8R IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCWC BIT8 
SCOPE. 


******«**4*4**************»****#444*************»**********************4 


001000 

001000 


001000 

001000 


157254 

157245 


157232 

157224 


tl2S: 125 ; ROUTINE NUMBER 125 * 

T 127 ADDRESS OF NEXT ROUTINE * 

100. ;TEST IT£Rk t ION COUNT 4 

ATBA SCOPE ENTRY POINT 4 

.LIST 

;#ft***«ft444**ft**44**ft***«4******44444444444444*44**ft4ft***44444*44*4444444 

:TEST THAT TCWC BIT9 CAN BE SET, AND CLEARED. 


ATBA: 


BIS 

BIT 

BNE 

ERROR 

SCOPE 

BIC 

BIT 

BEQ 

ERROR 

SCOPE 


»BIT9,3TCWC 

•BIT9,3TCWC 

.45 


»BIT9,3TCWC 

IBIT9,3TCWC 

.44 


; SET TCWC BIT9. 

;SEE IF BIT IS SET. 

{BRANCH IF SET. 

;TCWC BITS FAILEO TO. SET. 

{CLEAR TCWC BIT9. 

;SEE IF BIT IS CLEAR. 
{BRANCH IF BIT IS CLEAR. 
;TCWC BIT9 FAILED TO CLEAR. 
{SCOPE. 


kM | WV'V. fe» • 

• 444444 * 44444 * 4 ** 444444444 * 4 ** 44 * 444444444 44444 * 44444444*4444444444444444 


tl27: 


127 

T130 

1C. 

BA T 8A 


ROUTINE NUMBER 127 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


NflCYll ST< 732! 08-SEP-7B 08.-08 PAGE AS 


G04 


2355 

2355 

23b? 

23b3 

2359 

23?Q 

D'3*’ * 

23^2 

2373 

2374 
™* •% **%#*» 
do.- b 

car b 

2 37? 
pt*9 
2379 

2390 

2391 

2382 

2383 

2384 
2335 
238b 
239? 

2388 

2389 

2390 

Doqt 

2392 

2393 

2394 

2395 
23% 
239? 

2398 

2399 
2401. 
P-01 


2403 


2405 

240b 

2407 


Q11SQ2 

QliblQ 

011512 

011520 

011522 

011524 

011525 

011530 

011532 

011534 


Jilbub 

011544 

011552 

011554 

011555 

011550 

011555 

011574 

011575 


011702 

011704 

011705 

011710 


011712 

011720 

011722 

011730 

011732 


011735 

011740 


U3C. I ‘ 

104010 

03277? 

001401 

104003 

104011 

000130 

311702 

000144 

011535 


03277? 

001002 

104003 

104011 

042777 

032 7 ?7 

001401 

104003 

104011 

000131 

011.735 

000012 

011712 


052777 

104010 

032777 

001401 

104003 

104011 

000132 

012012 

000144 


001000 157200 
001000 157170 


.LIST 

; 4444*44*444444444444444444444444*4444444444*44444444444444444444444444 + 4 

TEST THAT RESET INSTRUCTION CLEARS TQWC 8119 


m. 


BATBB: 


BIS 

SRESET 

BIT 

9EQ 

ERROR 

SCOPE 


INSTRUCTION CLEARS TQWC BITS 

BIT9,3TCWC ;SET fCWC BIT9 

; ISSUE RESET TO CLEAR BIT. 
*BIT9,3TCWC ; SEE IF BIT IS CLEAR. 

BATBB ;BR IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCWC BIT9 
: SCOPE. 


yn > ww • yvv » k • vwi w * 

;H«**4HH*****H*****H*«**IH»»H*HH*»HWH««*«<*«*«**«** 


002000 

C02000 


002000 

002000 


157144 

157135 


157122 

157114 


t 130: 130 ; ROUTINE NUMBER 130 

1131 ; ADDRESS OF NEXT ROUTINE 

100. ; TEST ITERATION COUNT 

AUBA ; SCOPE ENTRY POINT 

.LIST 

;44444444«*444*4**44444444*444444»44*«*4*4*4*4444444444444444444444444444 

: TEST THAT TCWC BIT10 CAN BE SET, AND CLEARED. 


• * ww 1 

AUBA: 


ala 
SIT 
9NE 
ERROR 
SCOPE 

9IC *8IT10,3TCWC ; CLEAR TCWC BIT10. 

BIT iBITIO, aTCUC ; SEE IF BIT IS CLEAR. 

3EQ . +4 ; BRANCH IF BIT IS CLEAR. 

ERROR ; TCWC 8IT10 FAILED TO CLEAR. 

SCOPE ; SCOPE. 

T 131 : 131 -.ROUTINE NUMBER 131 * 

T 132 ; ADDRESS OF NEXT ROUTINE * 

IQ. -.TEST ITERATION COUNT # 

3AU8A ; SCOPE ENTRY POINT * 

.LIST 

; 4444444***44*4444444444444444444**444444*4444444444444444444444444444444 

1TEST THAT RESET INSTRUCTION CLEARS TCWC BIT10 


•BITIO, 3TCWC 
iBITIO 3TCWC 
.+5 


SET TCWC BIT1Q. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCWC BITiO FAILED TO SET. 


iBITIO, 3TCWC 
iBITIO, aTCUC 


002000 157070 &AUBA: 


002000 157050 


iBITIO, 3TCWC 


BAUBA: BIS iBITIO, 3TCWC ; SET TCWC BITIO 

SRESET ; ISSUE RESET TO CLEAR BIT. 

BIT iBITIO, 3TCWC ; SEE IF BIT IS CLEAR. 

BEQ BAUBB ;8R IF BIT IS CLEAR. 

ERROR ; RESET FAILED TO CLEAR TCWC BIT1Q 

BAUBB: SCOPE : SCOPE. 


iBITIO, 3TCWC 
BAUBB 


1 132 


132 

T133 

100 . 


ROUTINE NUMBER 132 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 


2408 

011744 

011745 




AVBA 


; SCOPE ENTRY POINT 4 

2409 






.LIST 



241Q 





: 4*44444444444*44444*44**44444*44444444444444444444*444444444444444444444 

£411 





:TEST 

THAT TCWC BIT i 1 CAN BE SET 

, AND CLEARED. 

2412 

011745 

052777 

004000 

157034 

A VBA: 

BIS 

•BITil,3TCWC 

;SET TCWC BHU. 

2413 

011754 

032777 

004000 

157025 


BIT 

•BIT11.3TCWC 

; SEE IF BIT IS SET. 

2414 

011752 

001002 




BNE 

.+5 

; BRANCH IF SET. 

2415 

011754 

104003 




ERROR 


;TCWC SIT 1 1 FAILED TO SET. 

2415 

011755 

104011 




SCOPE 



2417 

011770 

042777 

004000 

157012 


BIC 

•BIT11.3TCWC 

; CLEAR TCWC BITil. 

2419 

011775 

032777 

004000 

157004 


BIT 

•BITll.aTCWC 

;SEE IF PIT IS CLEAR. 


* * >f 


TCI - T 

CII TEST 

1 

MACYil 

27(732) 

D2TCAA. 

Pil 




2419 

012004 

001401 



2420 

012006 

104003 



2421 

012010 

104011 



DUD 3 

&Mi» 1 W 





2423 

012012 

000133 



2424 

012014 

012045 



2425 

012016 

0000 I 2 



2425 

012020 

Q 12022 



2427 





2428 





2429 





2430 

012022 

352777 

004000 

166760 

2431 

012030 

104010 



2432 

012032 

032777 

004000 

166750 

2433 

012040 

001401 



2434 

012042 

104003 



2435 

012044 

104011 



1 2436 





2437 

012046 

00C134 



2438 

012050 

012122 



2439 

012052 

000144 



2440 

012054 

012055 



2441 

->UUD 





2H3 





: 24 14 

U 12056 

052777 

01Q0C0 

166724 

2445 

012054 

032777 

010000 

166716 

24% 

012072 

001002 



2447 

012074 

104003 



2448 

012075 

104011 



2449 

012100 

042777 

OiuOOQ 

166702 

2450 

012105 

032777 

010000 

166674 

245 1 

012114 

001401 



245c 

012115 

104003 



) 2453 

012120 

104011 



2454 





2455 

012122 

000135 



2455 

012124 

012155 



2457 

012125 

000012 



2458 

012130 

012132 



2459 





2450 





2451 





2452 

012132 

052777 

010000 

166650 

2453 

012140 

104010 



2454 

012142 

032777 

010000 

166640 

2455 

012150 

001401 



2455 

012152 

104003 



£%? 

012154 

104011 



2458 





2469 

012156 

000136 



2470 

012160 

012232 



2471 

012162 

000144 



2472 

012164 

012166 




H04 


BEQ 

ERROR 

SCOPE 


BRANCH IF BIT IS CLEAR. 

TCWC 81 Til FAILED TO CLEAR. 
SCOPE. 


WVVi fa. • w # 

****##*M**M##*#*M*####**##*#**#*#****#*****#*#*###***##**#*******#*** 


1 133 


ROUTINE NUMBER 133 
T134 i ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BAVBA ; SCOPE ENTRY POINT * 

.LIST 

I*#**##***####*#*##*##*##*#####*****#**#**##**#*##**##******#**#****#**** 

:TEST THAT RESET INSTRUCTION CLEARS TCWC BIT 1 1 


ft I h» W J 

&AVBA: 


BAVBB 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


i8ITli,3TCWC 

•BITll.flTCWC 

BAVBB 


SET TCWC BITii 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

8R IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCWC BITii 
SCOPE. 


wn v WW • W V ft WVVI w * 

:***«************************##*#*************************************** 


t 134: 134 ; ROUTINE NUMBER 134 * 

T 1 35 ; ADDRESS OF NEXT ROUTINE * 

ICO. ; TEST ITERATION COUNT * 

AWBA ; SCOPE ENTRY POINT * 

.LIST 

;*****«#»*********************************»»*******«********************* 
{TEST THAT TCWC BIT12 CAN BE SET, AND CLEARED. 


i • ik> « 

£)WBA: 


BIS 

BIT 

3NE 

ERROR 

SCOPE 

BIC 

BIT 

BEQ 

ERROR 

SCOPE 


tBIT12,3TCWC 

•BIT12.3TCWC 

.+& 


#BIT12,3TCWC 

#BIT12,3TCWC 

.+4 


SET TCWC BIT12. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCWC 9IT12 FAILED TO SET. 

CLEAR TCWC 3IT12. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

TCWC 81 T 12 FAILED TO CLEAR. 

SCOPE. 


W i «/¥V» *m • 

*********$*********************M$%%**%***W****%*********************** 


tl35: 13S {ROUTINE NUMBER 135 * 

T136 {ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

3AM3A {SCOPE ENTRY POINT * 

.LIST 

;**#*###****#***********#****#*#***#*«************#********************* 
TEST THAT RESET INSTRUCTION CLEARS TCWC BIT12 


I ■ < 

BAWBA: 


BAWBB: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


#BIT12,3TCWC 

iBIT12,3TCWC 

BAWBB 


SET TCWC BIT12 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCWC BIT12 
SCOPE. 


v Vi v. | w vv! w • 


tl36: 136 {ROUTINE NUMBER 136 * 

T 1 37 {ADDRESS OF NEXT ROUTINE * 

100. {TEST ITERATION COUNT * 

AXBA {SCOPE ENTRY POINT * 

.LIST 

:************************************************************************ 



TCI 


02TCM.P11 


rcil TEST 


2475 

2478 
2477 

2479 

2479 

2480 

2481 

2482 

2483 

2484 


2488 

3 487 

2488 

2489 

2490 

2491 

2492 

2493 

2494 

2495 
24% 
249'’ 
2429 
2491 


2500 


2503 

2504 

2505 
2508 

2507 

2508 
2LJ9 

2510 

2511 

2512 

2513 

2514 

2515 
2518 

2517 

2518 

2519 


2521 

2522 

2523 

2524 

2525 
2528 

2527 

2528 

2529 

2530 


012188 

012174 

012202 

012204 

012208 

012210 

012218 

012230 

012232 

012234 

012238 

012240 


012242 

012250 

012252 

012280 

012282 

012264 

012286 

012270 

012272 

012274 


012278 

012304 

012312 

012314 

012316 

012320 

012326 

012334 

012338 

012340 

012342 

012344 

0123% 

012350 


012352 

012360 

012362 

012370 

012372 


104003 

104011 

0001 37 
012266 
000012 
012242 


UOZf i I 

104Q10 

032777 

001401 

104003 

104011 

000140 

012342 

000144 

012276 


052777 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

104003 

104011 

000141 

012376 

000012 

012352 


052777 

104010 

032777 

001401 

104003 
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104 



052777 

032777 

001002 

104003 

104011 

042777 

032777 


020000 

020000 


020000 

020000 


166814 

166606 


16657? 

166564 


020000 166530 


040000 

040000 


040000 

040000 


166504 

166476 


1 66462 
166454 


TEST THAT TCWC BIT13 CAN BE SET, AND CLEARED. 


I I It* wf I 

AXBA: 


ERROR 

SCOPE 

SIC 

BIT 

ERROR 

SCOPE 


#BIT13,3TCWC 
•BIT13 3TCUC 
.+6 


»T!i 

.+4 


1TCWC 

JTCWC 


; SET TCWC BIT13- 
; SEE IF BIT 15 SET. 

•BRANCH IF SET. 

; TCWC BIT13 FAILED TO SET. 

; CLEAR TCWC BITI3. 

SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; TCWC BIT13 FAILED TO CLEAR. 

: SCOPE. 


«mFW« W * WVVI bm * 

************************************************************************ 


T 137 : 137 ; ROUTINE NUMBER 137 * 

1140 ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BAXBA ; SCOPE ENTRY POINT * 

.LIST 

; ************************************************************************ 
{TEST THAT RESET INSTRUCTION CLEARS TCWC BIT13 


020000 166540 6 AXBA: 


BAXBB: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


•BIT13,3TCWC 

#9IT13,3TCWC 

BAXBB 


; SET TCWC BIT13 
; ISSUE RESET TO CLEAR BIT. 

;SEE IF BIT IS CLEAR. 

;BR IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCWC BIT13 
: SCOPE. 


h#r-V'T't w * w-wv* • 


tl40: 140 ; ROUTINE NUMBER 140 * 

T 141 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AYBA ; SCOPE ENTRY POINT * 

.LIST 

;***#*«**«**ft*ft**********#****ft**«*******«**4***********ft**************** 
:TEST THAT TCWC BIT14 CAN BE SET, AND CLEARED. 


• * tw * 

AYBA: 


Si I 

BNE 

ERROR 

SCOPE 

aic 

BIT 

BEQ 

ERROR 

SCOPE 


•BIT14,3TCWC 
•BIT14 3TCWC 
.+6 


tBITl4,3TCWC 

i8IT14,3TCWC 

.+4 


; SET TCWC BIT14. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCWC BIT 14 FAILEO TO SET. 

; CLEAR TCWC BIT14. 

;5EE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 
;TCWC BIT14 FAILED TO CLEAR. 

; SCOPE. 




tl41 


141: 141 ; ROUTINE NUMBER 141 * 

T142 ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BAYBA {SCOPE ENTRY POINT * 

. lis r 

ft***************'************#****************************************** 

TEST THAT RESET INSTRUCTION CLEARS TCWC BIT14 


040000 166430 SayBA: 
040000 166420 


8 7 S 

SRESET 

BIT 

BEQ 

ERROR 


•BIT14,3TCWC 

iBIT14,3TCWC 

BAYBB 


;SET TCWC 8IT14 

{ISSUE RESET TO CLEAR BIT. 

;SEE IF BIT IS CLEAR. 

:BR IF BIT IS CLEAR. 

{RESET FAILED TO CLEAR TCWC BIT14 


.J 
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J04 


012374 104011 


8AYBB: SCOPE ; SCOPE. 

;**M*************************ft****************************************** 


2533 

01237b 

000142 

T 142: 142 

•.ROUTINE NUMBER 142 

* 

3C04 

1 t 

012400 

012452 

T 1 43 

; ADDRESS OF NEXT ROUTINE 

* 

2535 

Q12 U Q2 

000144 

100. 

; TEST ITERATION COUNT 

* 

2535 

2537 

012404 

01240b 

AZBA 

.LIST 

; SCOPE ENTRY POINT 

* 


2538 

2533 

2540 


01240b 

012414 

012422 

.o t 


052777 


2548 

2549 

2550 


LUc4cb 

012430 

012444 

01244b 


001002 

104003 

104011 


100000 

100000 


100000 

100000 


1BS374 

lbb3bb 


1BB352 

1BB344 


j*######***#***#*****##**###*###**#*##*****#***#*####***********#**#*#*** 

; TEST THAT TCWC BIT15 CAN BE SET, AND CLEARED. 


i • *■»«# i 

AZBA: 


uuitui 

104003 

104011 


ERROR 

SCOPE 

BIC 

fJTT 

»p# * » 

BEO 

ERROR 

SCOPE 


#8IT15,3TCWC 

#8IT15,3TCWC 

.+6 


#BIT15,3TCWC 

#BIT15.3TCWC 

.+4 


; SET TCWC BIT15. 

; SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCWC BIT 15 FAILED TO SET. 

; CLEAR TCWC BIT15. 

; SEE IF BIT IS CLEAR. 

; 3RANCH IF BIT IS CLEAR. 

; TCWC BIT IS FAILED TO CLEAR. 

; SCOPE. 


##*#**##***#*#**###**iHHw*#MM4#«#*##****#*«#*##*M#*##*##***##*#*«# 


2552 

012454 

012508 




T144 


; ADDRESS OF NEXT ROUTINE * 

2553 

012458 

000012 




10. 


•TEST ITERATION COUNT * 

2554 

012480 

012482 




BAZ3A 


; SCOPE ENTRY POINT * 

2555 






.LIST 



bcsx 





; a*********************************************************************** j 

1 2557- 





:TE5T 

THAT RESET INSTRUCTION 

CLEARS TCWC BIT15 

2558 

012482 

052777 

100000 

188320 

6 AZBA: 

BIS 

*BIT15,3TCWC 

;S£T TCWC BIT15 

I 2559 

012470 

104010 




SRESET 


; ISSUE RESET TO CLEAR BIT. 

25B0 

012472 

032777 

100000 

188310 


BIT 

*BIT15,3TCWC 

; SEE IF BIT IS CLEAR. 

| 25B1 

012500 

001401 




BEQ 

BAZBB 

;BR IF BIT IS CLEAR. 

2582 

012502 

104003 




ERROR 


; RESET FAILED TO CLEAR TCWC BIT1S 

1 pcc.'j 

012504 

104011 



BAZBB: 

SCOPE 


; SCOPE. 

j 2584 





: *********************«**#**#m**************************************** 

2585 

012508 

000144 



T144: 

144 


; ROUTINE NUMBER 144 * 

| 2588 

012510 

012544 




T145 


; ADDRESS OF NEXT ROUTINE * 

2587 

012512 

001750 




1000. 


; TEST ITERATION COUNT * 

! 2588 

012514 

012518 




AACA 


; SCOPE ENTRY POINT * 

I 2589 






.LIST 



2570 





I************************************************************************ 

1 2571 





•TEST 

THAT TCDT 

CAN BE SET TO 

125252 

'5 2572 

012518 

012777 

125252 

188270 

AACA: 

MOV 

#125252, 3TCDT 

:SET TCDT TO VALUE. 

25 7 3 

012524 

022777 

125252 

188282 


CMP 

#125252, 3TCDT 

;SEE IF TCDT IS SET TO VALUE. 

j gC' "4 

012532 

001401 




BEQ 

APCB 

; BRANCH IF TCDT IS SET CORRECTLY. 

J 2b 

012534 

104003 




ERROR 


jTCDT DID NOT SET TO VALUE. 

i 25/ 0 

012538 

005077 

188252 


AACB: 

CLR 

3TCDT 

; CLEAR TCDT 

j 2577 

012542 

104011 




SCOPE 


, 

2578 





: ************M***********************#Htt******************************* s 

1 2579 

012544 

000145 



T145: 

145 


.•ROUTINE NUMBER 145 * 

! 2580 

0125% 

012802 




T148 


; ADDRESS OF NEXT ROUTINE * 

! 2581 

012550 

001750 




1000. 


; TEST ITERATION COUNT * 

i 2582 

012552 

012554 




A8CA 


; SCOPE ENTRY POINT * 

! 2583 






.LIST 




2584 

2585 
258b 


112554 Cl 2777 052525 1BB232 


;*ft****ftft*«****ft**ft*ft«**ftftft*M*ftft***ft«****#ftft*>M*ft**ft*tt**fttt*«*fc*ft«ft**ft** 

: TEST THAT TCDT CAN BE SET TO 052525 

&BCA: MOV *052525, 3TCDT ;SET TCDT TO VALUE. 
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TCI - Toil TEST 1 
DZTCAA.Pil 


K04 


01256,2 


26,03 


2806 

26,07 


26,09 

2610 


26,12 

26,13 


CO ID 

2bl7 
251 S 
2819 


26,22 


2824 

2825 
2828 
2827 


2591 

2592 


012574 

012800 


022777 

001401 

104003 

005077 

104011 


052525 188224 


188214 


CMP #052525, 3TCDT ; SEE IF TCDT IS SET TO VALUE. 

BEQ ABCB ; BRANCH IF TCOT IS SET CORRECTLY. 

E^ROR ;TCDT DIO NOT SET TO VALUE. 

ABCB: CLR 3TCDT ; CLEAR TCDT 

SCOPE 

I************************************************************************ 


: SEE IF TCDT IS SET TO VALUE. 

; BRANCH IF TCDT IS SET CORRECTLY. 

;TCDT DID NOT SET TO VALUE. 

; CLEAR TCDT 


2593 

012602 

000146 

T 146 : 146 

; ROUTINE NUMBER 146 

* 

2594 

012604 

012640 

T147 

; ADDRESS OF NEXT ROUTINE 

* 

2595 

012606 

001750 

1000. 

; TEST ITERATION COUNT 

* 

2596 

2597 

012610 

012612 

ACCA 

.LIST 

; SCOPE ENTRY POINT 

♦ 


2593 

2599 


0i2812 

012820 

012828 

012830 

012832 

012838 

012840 

012842 

012844 

012848 


012850 

012858 

012884 

012888 

012870 

012674 

012878 

012700 

012702 

012704 


012777 

022777 

001401 

104003 

005077 

104011 

000147 
012678 
00 1750 
012850 


012777 

022777 

001401 

104003 

005077 

104011 

000150 

012734 

001750 

012706 


177777 

177777 


186156 


125252 

125252 


166118 


168134 

168128 


012714 
2830 C'^22 U01401 
2821 £ ’24 104003 

2832 0*2726 005077 166080 

2833 012732 104011 

2834 

2635 012734 000151 

2636 012738 012772 
2837 012740 001750 

2638 012742 012744 

2639 

2640 

2641 

2642 012744 012777 177776 166040 


012777 

022777 

U01401 

104003 

005077 

104011 

000151 

012772 

001750 

012744 


052524 

052524 


166078 

166070 


; ************************************************************************ 


166174 

166166 


TEST THAT TCDT CAN BE SET TO 17777 


ACCA: MOV 


#177777, 3TCDT 

CMP #177777, 3TCDT -SEE IF TCDT is SET TO VALUE. 

BEQ ACCB ; BRANCH IF TCDT IS SET CORRECTLY. 

ERROR ; TCDT DID NOT SET TO VALUE. 

3CCB: CLR 3TCDT ; CLEAR TCDT 

SCOPE 

; ************************************************************************ 


ACCB: 


3TCDT 


SET TCDT TO VALUE. 

SEE IF TCDT is SET TO VALUE. 
BRANCH IF TCDT IS SET CORRECTLY. 
TCDT DID NOT SET TO VALUE. 

CLEAR TCDT 


1 147 : 


147 

T15Q 

1000. 


ROUTINE NUMBER 147 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


;***HH********************iHH(******«***************««****************** 
:TEST THAT TCBA CAN BE ST TO 125252 


taCA: 


#125252, 3TCBA 
#125252, 3TCBA 
ADCB 


3TCBA 


; SET TCBA TO VALUE. 

; SEE IF TCBA IS SET TO VALUE. 

; BRANCH IF TCBA IS SET CORRECTLY. 
; TCBA DID NOT SET TO VALUE. 

; CLEAR TCBA 


BEQ ADCB ; BRANCH IF TCBA IS SET CORRECTLY. 

ERROR ; TCBA DID NOT SET TO VALUE. 

ADCB: CLR 3TCBA ; CLEAR TCBA 

SCOPE 

*********************************************************************** 


tl50: 150 ; ROUTINE NUMBER 150 * 

T 151 ; ADDRESS OF NEXT ROUTINE * 

1000. ; TEST ITERATION COUNT * 

AECA ; SCOPE ENTRY POINT * 

.LIST 

;******************************#***************************************** 
:TEST THAT TCBA CAN BE SET TO 052524 


ROUTINE NUMBER 150 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 




#052524, 3TCBA 
#052524, 3TCBA 
AECB 


; SET TCBA TO VALUE. 

;SEE IF TCBA IS SET TO VALUE. 

BEQ AECB ' ; BRANCH IF TCBA IS SET CORRECTLY. 

ERROR ;TCBA DID NOT SET TO VALUE. 

AECB: CLR 3TCBA CLEAR TCBA 

SCOPE 

I************************************************************************ 

tl51: 151 ; ROUTINE NUMBER 151 * 

T152 ; ADDRESS 0^ NEXT ROUTINE * 

1000. ; TEST ITERATION COUNT * 

AFCA ; SCOPE ENTRY POINT * 

.LIST 

;*************************#********************************************** 

:TEST THAT TCBA CAN BE SET TO 177776 

ftFCA: MOV #177776.3TCBA ; SET TCBA TO VALUE. 


1 
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| DZTCAA 

.Pii 







j 2543 

012752 

022777 

177776 

166032 


cnp 

#177776, 3TCBA ; SEE IF TCBA IS SET TO VALUE. 

2544 

012760 

001401 




BEQ 

AFCB ; BRANCH IF TCBA IS SET CORRECTLY. 

2645 

012762 

104003 




ERROR 

TCBA DID NOT SET TO VALUE. ; 

2645 

012764 

005077 

166022 


AFCB: 

CLR 

3TCBA ; CLEAR TCBA 

2647 

012770 

104011 




SCOPE 


2543 





I************************************************************************ 

2649 

012772 

000152 



T 152: 

152 

; ROUTINE NUMBER 152 * 

265Q 

012774 

013030 




T153 

; ADDRESS OF NEXT ROUTINE * 

2651 

012776 

001750 




1000. 

TEST ITERATION COUNT * 

2652 

013000 

013002 




AGCA 

; SCOPE ENTRY POINT * 

2653 






.LIST 


2654 





:***********#***##*#*********##****************************************** 1 

2655 





•TEST 

THAT TCWC 

CAN BE SET TO 125252 j 

2656 

013002 

012777 

125252 

166000 

AGCA: 

MOV 

#125252, 3TCWC ; SET TCWC TO VALUE. 

| 2557 

013010 

022777 

125252 

165772 


CMP 

#125252, 3TCWC ; SEE IF TCWC IS SET TO VALUE. 

2658 

013016 

001401 




BEQ 

AGCB ; BRANCH IF TCWC IS SET CORRECTLY. 

2659 

013020 

104003 




ERROR 

•TCWC DID NOT SET TO VALUE. i 

255Q 

013022 

005077 

165762 


AGCB: 

CLR 

3TCWC -CLEAR TCWC 

2551 

013026 

104011 




SCOPE 


2662 





:*****#*******************«************«****#*#******#**************#** 

2653 

013030 

000153 



T 153: 

153 

; ROUTINE NUMBER 153 * 

2654 

013038 

013066 




T154 

; ADDRESS OF NEXT ROUTINE * 

2555 

013034 

001750 




1000. 

;TEST ITERATION COUNT * 

2555 

013036 

013040 




AHCA 

{SCOPE ENTRY POINT * 

2657 






.LIST 


2558 





: *********************************************************************** 

2659 





•TEST 

THAT TCWC 

CAN BE SET TO 052525 

2570 

013040 

012777 

052525 

165742 

AHCA: 

MOV 

#052525, 3TCWC ;SET TCWC TO VALUE. 

2571 

013046 

022777 

052525 

165734 


CMP 

#052525, 3TCWC ; SEE IF TCWC IS SET TO VALUE. 

2572 

013054 

001401 




8EQ 

AHCB {BRANCH IF TCWC IS SET CORRECTLY. 

2673 

013056 

104003 




ERROR 

;TCWC DID NOT SET TO VALUE. 

2574 

013060 

005077 

165724 


AHCB: 

CLR 

3TCWC {CLEAR TCWC 

2675 

013064 

10401 1 




SCOPE 


2576 





I************************************************************************ 

2677 

013066 

000154 



T154: 

154 

{ROUTINE NUMBER 154 * 

2578 

013070 

013124 




T155 

ADDRESS OF NEXT ROUTINE * 

2579 

01307? 

001750 




1000. 

{TEST ITERATION COUNT * 

2680 

013074 

013076 




AICA 

SCOPE ENTRY POINT * j 

2581 






.LIST 


2582 





:***ftft*ft*»tt*Mftftf*«ttftftft***MMft***Sfttt******»fttt***»ft*ftftftft*ttft*****ft**ftft*ft*« j 

2583 





•TEST 

THAT TCWC 

ChN BE SET TO 177777 

2684 

013076 

012777 

177777 

165704 

AlCA: 

MOV 

#177777, 3TCWC ;SET TCWC TO VALUE. 

2585 

013104 

022777 

177777 

165676 


CMP 

#177777, 3TCWC ; SEE IF TCWC IS SET TO VALUE. 

8685 

013112 

001401 




BEQ 

AICB {BRANCH IF TCWC IS SET CORRECTLY. 

2687 

013114 

104003 




ERROR 

;TCWC DID NOT SET TO VALUE. 

2588 

013116 

005077 

165666 


AICB: 

CLR 

3TCWC {CLEAR TCWC 

2689 

013122 

104011 




SCOPE 


2590 





;********#****#***#********#**###********#**********iHH(**^******iH******* i 

2691 

013124 

000155 



T 155: 

155 

{ROUTINE NUMBER 15S * 

2692 

013126 

013200 




T156 

{ADDRESS OF NEXT ROUTINE * 

2693 

013130 

000144 




100. 

{TEST ITERATION COUNT * 1 

2694 

013132 

013134 




AJCA 

{SCOPE ENTRY POINT * 

2695 






.LIST 


2696 





I************************************************************************ 

2597 





•TEST 

THAT TCCM BIT! CAN BE SET. AND CLEARED. 1 

2698 

013134 

052777 

000002 

165644 

AJCA: 

BIS 

#BIT1,3TCCM ;SET TCCM BIT1. 


TCI - TC11 TEST 1 
D2TCAA.P11 


2bS9 

013142 

032777 

2700 

013150 

001002 

2701 

01315? 

104003 

2702 

013154 

104011 

7703 

013155 

042777 

2704 

013154 

032777 

2705 

013172 

001401 

270b 

013174 

104003 

2707 

013175 

104011 

2708 



2709 

013200 

000155 

2710 

013202 

013234 

271 J 

013204 

000012 

2712 

013205 

013210 

J7 > rj 



2714 



2715 



2715 

013210 

052777 

2717 

013215 

104010 

2713 

013220 

032777 

2719 

013225 

001401 

2720 

013230 

104003 

2721 

013232 

104011 

2722 



2723 

013234 

000157 

2724 

013235 

013310 

2725 

013240 

Q00144 

2725 

013242 

013244 

2727 



2728 



2729 



2730 

013244 

052777 

2731 

013252 

032777 

2732 

012250 

001002 

2733 

013252 

104003 

2734 

013254 

104011 

2735 

013255 

042777 

2735 

013274 

032777 

2737 

013302 

001401 

2 7 38 

013304 

104003 

2739 

013305 

104011 

2740 



2741 

013310 

000150 

2742 

013312 

013344 

2743 

013314 

000012 

2744 

013315 

013320 

2745 



2745 



2747 



2748 

013320 

052777 

2749 

013325 

104010 

2750 

013330 

032777 

2751 

013335 

001401 

2752 

013340 

104003 

2753 

013342 

104011 

2754 
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000002 

155535 

BIT 

IBIT1,3TCCM 

;5E£ IF BIT IS SET. 



BNE 

.+5 

; BRANCH IF SET. 



ERROR 


; TCCM BITl FAILED TO SET. 



SCOPE 



000002 

155522 

BIC 

#BITi,3TCCM 

; CLEAR TCCM BITl. 

000002 

155514 

BIT 

#BIT1,3TCCM 

; SEE IF BIT IS CLEAR. 



3EQ 

.+4 

; BRANCH IF 81 T IS CLEAR. 



ERROR 


TCCM BIT! FAILED TO CLEAR. 



SCOPE -SCOPE, 

:*************************#**#**£****#*******m******M***************** 



T155: 155 


; ROUTINE NUMBER 155 * 



T157 


; ADDRESS OF NEXT ROUTINE * 



10. 


TEST ITERATION COUNT * 



BAJCA 


; SCOPE ENTRY POINT * 



.LIST 




000002 

000002 


155570 

1B55B0 


;*****#*************#**********#*****************#***#******************* 
JEST THAT RESET INSTRUCTION CLEARS TCCfl 8IT1 


&AJCA: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


#3ITi,3TCCM 


«BIT1,3TCCM 

BAJCB 


000004 

000004 


0000Q4 

000004 


155534 

155525 


1S5512 

155504 


; SET TCCfl BIT1 
ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;8R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCCfl BIT1 

BAJCB: SCOPE SCOPE. 

;******#***************4Ht***0*******»«*********ft*tt********************** 
tlS7: 157 ; ROUTINE NUNBER 157 * 

T 160 ; ADDRESS OF NEXT ROUTINE * 

1QQ. ; TEST ITERATION COUNT * 

AKCA ; SCOPE ENTRY POINT * 

.LIST 

i********^*******************************************************#*#*** 

JEST THAT TCCfl BIT2 CAN BE SET, AND CLEARED. 


AKCA: 


BIS 
BIT 
8NE 

ERROR 

SCOPE 

BIC 

BIT 

BEQ 

ERROR 

SCOPE 


#BIT2,3TCCM 

#BIT2,3TCCM 

.+ 6 > 


SET TCCfl BIT2. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCCM BIT2 FAILED TO SET. 


#BIT2,3TCCM 

*BIT2!3TCCf1 

.+4 


000002 

000002 


ie>546>0 

1S5450 


; CLEAR TCCM BIT2. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

TCCM BIT2 FAILED TO CLEAR. 

; SCOPE. 

;*****ft********t*ftft********ft***«***************«ft***ft#****4**ft**ft******** 

tlbO: IbO ; ROUTINE NUMBER ISO 4 

Tibi ; ADDRESS OF NEXT ROUTINE 4 

10. JEST ITERATION COUNT 4 

BAKCA ; SCOPE ENTRY POINT 4 

.LIST 

;44«Ift*444444«*ft4444«**«*«4»«««ft*44444*44ft4«***ttft»44ft*4444*444444444I4444 
TEST THAT RESET INSTRUCTION CLEARS TCCM BITl 


1 

&AKCA: 


BAKC8: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


•8ITl,3TCCM 

»BIT1,3TCCM 

BAKCB 


j SET TCCM BITl 
; ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;8R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCCM BITl 
; SCOPE. 





I TCI ~ TCll TEST 1 
! D2TCAA.P1 l 


2755 

0.13344 

000161 

w. / ■ f 

mm 

8 ® 

2758 

0.13352 

013354 

2759 



2760 



2761 



2762 

013354 

052777 

2763 

013362 

032777 

2764 

013370 

001002 

£765 

013372 

104003 

2766 

013374 

104011 

2767 

013376 

042777 

2768 

C113404 

032777 

2769 

013412 

001401 

2770 

013414 

104003 

| 

C i i I 

3*777 

013416 

104011 

' €m: i I '£ 

i in* ^ f 

01 3420 

000162 

2774 

013422 

013454 

2775 

013424 

000012 

2776 

OT’T'T 

013426 

013430 

C/ t t 

2778 



2779 



27b0 

013430 

052777 

2781 

013436 

104010 

2782 

013440 

03c' 77 

2783 

013446 

001401 

2784 

013450 

104003 

771 5 

013452 

104011 

c. 06 



£787 

013454 

000163 

2788 

013453 

013530 

2769 

013460 

000144 

2790 

OTTl 

tu * # A 

2 7 5? 

013462 

013464 

2753 



2794 

013464 

052777 

2795 

013472 

032777 

27% 

013500 

001002 

2797 

013502 

104003 

2798 

01 3504 

104011 

2759 

013506 

042777 

2800 

013514 

032777 

2801 

01352“' 

0Q1HQ1 

2802 

0x3r:-t 

104003 

. 2803 

013526 

104011 

2804 



2905 

013537 

000164 

l 76 

013532 

013564 

- 

'13534 

0000 1? 

28 

>13336 

01 3540 
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TIBI : lb. ; ROUT INE NUMBER 181 * 

W I 

ALIA ; SCOPE ENTRY POINT * 

A 1ST 

;**mHHH*»l**»***»**IHm»**4»»*0*mH«***t*«m***»H»H*IHHt 

:TEST THAT TCCM BIT3 CAN BE SET, AND CLEARED. 


N04 


ROUTINE NUMBER 181 
SCOPE ENTRY POINT 


000010 

000010 


000010 

000010 


185424 

185418 


185402 

165374 


ALCA: 


9NE 

ERROR 

SCOPE 

aic 

BIT 

8EQ 

ERROR 

SCOPE 


#3IT3,3TCCM 
•9IT3 3TCCH 
.+8 


#BIT3,3TCCM 

IBIT3.3TCCM 

.+4 


;S£T TCCM 8IT3. 

SEE I? BIT IS SET. 

; BRANCH IF SET. 

; TCCM 6IT3 FAILED TO SET. 

; CLEAR TCCM 8IT3. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR. 

; TCCM BIT3 FAILED TO CLEAR. 
: SCOPE. 


!***o#*W**«ft*******#**»ft*ft*«**i'*»*«»«**t#**tfti***ft*ftft*#ft«ft*********ft«t* 
+162: 182 ; ROUT INE NUM3ER 162 * 

RESS OF NEXT ROUTINE 


000010 

000010 


165350 

165340 


T162: 162 ; ROUT INE NUM3ER 162 * 

T183 ; AOORESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BALCA ; SCOPE ENTRY POINT * 

.LIST 

;***##«****♦**#*******#**######*******#*»»***##**#*#***####*«***##****** 
.-TEST THAT RESET INSTRUCTION CLEARS TCCM BIT3 


&ALCA: 


BALCB: 


BIS 

SRESET 

BIT 

BEQ . 

ERROR 

SCOPE 


#BIT3,3TCCM 

#BIT3,3TCCM 

BALCB 


SET TCCM BIT3 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCCM BIT3 
SCOPE. 


m«**H******«»*#*«i*H#*m»>f»****H*«tH******m»»***#*it*iH(**** 


+163 


ROUTINE NUMBER 163 
ADDRESS OF NEXT ROUTINE 
100. ; TEST ITERATION COUNT * 

AMCA ; SCOPE ENTRY POINT * 

.LIST 

;****##*******m****^#*****m********#*#**m************************* 
;TEST THAT TCCM BIT4 CAN BE SET, AND CLEARED 


000020 

000020 


000020 

000020 


165314 

165306 


165272 

165264 


{ i t 

AMCA: 


BIS 

BIT 
BNE 
ERROR 
SCOPE 

BIC #BIT4,3TCCM .-CLEAR TCCM BI')4. 

BIT #BIT4,3TCCM ; SEE IF BIT IS CLEAR. 

BEQ .+4 ; BRANCH IF BIT IS CLEAR. 

ERROR ; TCCM BIT4 FAILED TO CLEAR. 

SCOPE ; SCOPE. 

a ***************#****m***********»***************************** 
i ...t ; ROUTINE NUMBER 164 * 

;.u5 ; ADDRESS OF NEXT ROUTINE * 

10. ; it. oT ITERATION COUNT , * 

BAMCA SCOPE ENTRY POINT * 

.LIST 

**************** ******************************************************** 


»BIT4,3TCCM 
•BIT4 3TCCM 
.+6 


SET TCCM BIT4. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCCM BIT4 FAILED TO SET. 


#BIT4,3TCCM 
•BIT4 3TCCM 
.+4 



si % 
j 

f -% « 

1 W*.l 


- TCI l 
AA.Pli 


2sn 

30 t 0 
%», W i. i» 

2313 

2314 

30 • C 

I** % <kA 

23 lb 

oq i •* 

Km Kt 4 * 

2313 
2313 
2920 
£tlc 1 
2923 

oqnj 


332S 

292" 

2928 

2323 

3330 

2931 

2932 

2933 

2334 

2335 


23J. 

2333 

2939 

2340 

2341 
2942 
2843 
2344 
2945 
23% 
234? 
2349 
2349 
2330 

2§S? 


£9SH 

>3CX 

s*». -w» 2* 

23SB 
295? 
28S8 
2839 
2880 
288 1 
2882 

2883 

2884 
2985 
2888 


012540 

013548 

013550 

013558 

013580 

013552 

013584 
013588 
010570 
0135"’ 5 


013574 

013802 

013510 

013812 

013514 

013515 

013824 

013832 

313534 

013535 

013540 

013542 

013544 

013848 


013550 

D1j558 

013580 

013888 

013870 

013872 

013874 

0138/ 8 
013700 
013702 


013704 

013712 

013720 

013722 

013724 

013728 

013734 

013742 

013744 


0S2 
194010 
032777 
001401 
10H003 
104011 

000187 

013750 

090144 

013704 


052777 

032777 

001002 

104003 

1040U 

042777 

032777 

001401 

104003 
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B05 


AC 

im'ih 

03277*' 

001401 

104003 

104011 

000165 

913540 

000144 

313574 


05277? 
032??*' 
001002 
104003 
l 940 II 
042??? 
032??? 
001401 
104003 
104011 

000188 

013874 

000012 

013850 


000020 

000020 


165240 

165230 


000040 

000040 


40 

40 


165204 

165176 


165182 

165154 


000040 

000040 


165130 

165120 


000 100 
00010C 


000100 

000100 


165074 

165066 




: TEST 

Samoa : 


BAMCB: 


‘HAT RESET INSTRUCTION CLEARS TCCM SIT4 

SET TCCM SI T4 
ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

8R IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCCr BIT4 
SCOPE 


915 
SRE5ET 
BIT 
BE 3 
ERROR 
SCOPE 


I9IT4.3TCCM 

IBIT4.3TCCM 

BAMCB 




ti65: 


185 

T 166 

100 . 

ANCA 
.LIST 

-TEST THAT TCCM BITS CAN BE SET, AND CLEARED 


ROUTINE NUMBER 165 
ADDRESS OF NEXT ROUTINE 
TES T ITERATION COUNT 
SCOPE ENTRY POINT 


ANCA: 


315 
BIT 
9NE 
ERROR 
SCOPE 
310 
SIT 
3EQ 
ERROR 
SCOPE 


•BIT5.3TCCM 
«BIT5,3TCCM 
♦6 


•8IT5.3TCCM 
•8IT5.3TCCM 
. >4 


; S£ T TCCM BITS. 

; SEE I r BIT IS SET. 

; BRANCH IF SET. 

; TCCM 8IT5 FAILED TO SET. 

; CLEAR TCCM BITS. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF SIT IS CLEAR. 

; TCCM BITS FAILED TO CLEAR. 

: SCOPE. 


t VVV» » 


tl66: 185 

Tib? 

10 , 

BANCA 
• LIST 

[TEST THAT RESET INSTRUCTION CLEARS TCCM BITS 


; ROUTINE NUMBER 166 
; AOORESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


&ANCA: 


BANCB: 


ars 

SRESET 

BIT 

BEG 

ERROR 

SCOPE 


•8ITS.3TCCM 

»BIT5,3TCCM 

BANCB 


SET TCCM BITS 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

SR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCCM BITS 
SCOPE. 


w w t'Wtwf * wm | ' W #ww r * mm * 


tl67: 


ROUTINE NUMBER 167 
AOORESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


161 
TITO 
100 . 

AQCA 
.LIST 

;ft#i##«***ftt#*ftft***«***tft*t#***ft«*ftt»**#»**ft«»ftt**ft*t*«***»************** 
TEST THAT TCCfl DIT6 CAN BE SET, ANO CLEARED. 


AoCA: 


BIS 
BIT 
8NE 
ERROR 
SCOPE 
BIG 
BIT 
BEQ 
ERROR 


•8IT6,3TCCM 
•BIT6.3TCCM 
.♦6 


«BIT6,i 

•BITS.; 

.♦4 


ITCCM 

ITCCM 


; SET TCCM BUb. 

;SEE IF BIT IS SET. 

; BRANCH IF SET. 

; TCCM BIT6 FAILED TO SET. 

-.CLEAR TCCM BITS. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF BIT 1$ CLEAR, 
;TCCM BITb FAILED TO CLEAR. 



J 


TCI - TCI l T£ST 
DZ-CAA.Pll 


2357 

3 QLD 

013745 

104011 


81^2 

000170 

014004 

2371 

013754 

000012 


010755 

013750 

2973 






DCpC 



fluw. V* ■" V* 

013750 

952777 

cb / -■ 

013755 

104Q1Q 

DCpD 

■W W» ‘ V* 

313770 

332777 

■w -V* 3 

013775 

001401 

2930 

014000 

104003 

300! 

W. V* 1. 

3 i 4002 

104011 

DODD 

,f W. w- ■ 




01400^ 

000171 

2394 

014005 

014Q5Q 

3DOC 

014010 

000144 

**V*S£V r 

c 

014012 

014014 

2337 



2809 



2384 



2990 

314014 

052777 

2991 

Dl40£a 

032777 

2892 

014C30 

001002 

2333 

014032 

1QHQ03 

2994 

014034 

104011 

2S9S 

014035 

042777 

29% 

014044 

032777 

2997 

014052 

001401 

29% 

014054 

104003 

2399 

014055 

104011 

2900 



2901 

014050 

000172 

2902 

014052 

01H114 

2903 

014054 

>000012 

2904 

014055 

014070 

2905 



29% 



2907 



2908 

Qa4Q73 

052777 

2909 

0F975 

104010 

2910 

0*4iLC 

032777 

2911 

014105 

001401 

2912 

014110 

104003 

2913 

014112 

104011 

2914 



£915 

014114 

000173 

29 '5 

014115 

014170 

2917 

014120 

000144 

2913 

014122 

014124 

2919 



2920 



2521 


052777 

2922 

014124 
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C05 


SCOPE 'SCOPE, 

****#*#*#*#*#**#«*####*«*####*##*###**t****##*#*#*#****#*##*****#**»*# 


tl70: 


‘1 


ROUTINE NUMBER 170 
ADDRESS OF NEXT ROUTINE 
T EST ITERATION COUNT 
SCOPE ENTRY POINT 


000100 

000100 


155020 

155010 


fi? 

10 

BAOCA 
.LIST 

;#ft»«*fttt*4****#****#tt*#ft#tt*«ft**#ft****#*ft*ft*****ft*#»**ft**ft***#****«******* 

: TEST THAT RESET INSTRUCTION CLEARS TCCM BITS 


• * mm wm * 

§AOCA: 


BIS 
5RESET 
JIT 
B r Q 
ERROR 
SCOPE 


IBIT5.3TCCM 


IBIT5.3TCCM 

BAOCB 


000400 

000400 


000400 

000400 


154754 

154755 


154742 

154734 


; SET TCCM BIT5 
; ISSUE RESET TO CLEAR BIT. 

;S£E IF BIT IS CLEAR. 

;8R IF BIT IS CLEAR. 

; RESET FAILED TO CLEAR TCCM BITE 

BAOCB: SCOPE ; SCOPE. 

;***#«*ft***4**#*ft**4«***«**#*«*##*ftft*#****»*4ft»*ft*»*#*»4***************** 

t 171 : 171 ; ROUTINE NUMBER 171 * 

T172 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

A PCA ; SCOPE ENTRY POINT * 

.LIST 

; 4444444»»44444444444444444444444»***444*44444444444444444444444444444444 

[TEST THAT TCCM BIT8 CAN BE SET, AND CLEARED. 


APCA: 


SIS 
SIT 
8NE 
ERROR 
SCOPE 
8IC 
BIT 
BEQ 
ERROR 
SCOPE 


*8IT8,3TCCM 
•BIT8.3TCCM 
.♦5 


SET TCCM BIT8. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCCM BITS FAILED TO SET. 


I8IT8.'3TCCM 

•BIT8.QTCCM 

.+4 


000400 

000400 


154710 

154700 


; CLEAR TCCM BITS. 

; SEE IF BIT IS CLEAR. 

; BRANCH IF BIT IS CLEAR, 

TCCM BIT8 FAILED TO CLEAR. 

; SCOPE. 

:«*t*t*********************#**##i**»*4**#*»4t*»#***ft*##ft*»***«ft********** 

172 ; ROUTINE NUMBER 172 

T173 ; AODRESS OF NEXT ROUTINE 

10. ; TEST ITERATION COUNT 

BAPCA ;SCOPE ENTRY POINT 

.LIST 

; 44444444444444444444444444444444*144444444444444444444444444444444444444 

:TEST THAT RESET INSTRUCTION CLEARS TCCM BIT8 


tl?2: 


6APCA: 


BAPCB: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


•BIT8.3TCCM 

iBIT8,3TCCM 

BAPCB 


SET TCCM BITS 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

8R IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCCM 91 T9 
SCOPE. 


wni vw« * 


001000 154554 


tl73: 173 

TI74 

100 . 

AQCA 
.LIST 

; 444444444444444444444444444444444444444444444444444444444444144444444444 

:TEST THAT TCCM BITS CAN BE SET, AND CLEARED. 

AQCA: BIS IBITB.3TCCM ;SET TCCM BITS. 


; ROUTINE NUMBER 173 
; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 
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- TCil TEST 
OAA.Pll 


D05 


2923 

2929 

2925 

292b 

2927 

2929 

2929 

2330 

2331 

2932 

2933 
2939 
2935 
293b 
2937 
2939 


OS 44 ! 

2392 

2993 

2399 

2395 


2997 

2999 

2999 

2950 


2953 


Ticwr’C*’ 

295b 

2957 

2958 


2952 

2953 
.2959 
2955 


2957 

2958 

2959 
2970 


019132 032777 001000 154595 


UiMcib 

014220 

014222 

014229 

014225 

014230 

014232 


014234 

014292 

01H250 

014252 

014254 

014255 

014254 

014272 

014274 

014275 

014300 

014302 

014309 

014305 


014310 

014315 

014320 

014325 

014330 

014332 


014144 

014145 

014154 

014152 

014154 

014155 

014170 

014172 

014179 

019175 


014200 

014205 

014210 


104003 

104011 

042777 

032777 

001401 

104003 

104Q11 

000174 

*)]4334 

000012 

014200 


104010 

032777 

001401 

104003 

104011 

000175 

014300 

000144 

014234 


052777 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

104003 

104011 

000175 

014334 

000012 

014310 


052777 

104010 

032777 

001401 

104003 

104011 


0C1000 

001000 


154532 

154524 


001000 154570 


002000 

002000 


002000 

002000 


154544 

154535 


154522 

154514 


002000 154470 
00200C 154450 


BIT 

3NE 

ERROR 

SCOPE 

8IC 

BIT 

3E0 

ERROR 

SCOPE 


«8IT9,3TCCM 
. +5 


iBIT9,3TCCM 

iBIT9,3TCC« 

.+4 


SEE IF BIT IS SET. 

BRANCH IF SET. 

TCCfl 31 T9 F; AILED TO SET. 

Ci»£AR TCCfl BIT9. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 
TCCfl BITS FAILED TO CLEAR. 
SCOPE. 


•rfVW I ft* I •* * 

;0*#*#*$#******M*0****#*##**#*$#*#4###$**#**##*#***#*#************#*** 


tl74: 


ROUTINE NUMBER 174 
T 1 75 ; AD0RE5S OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

9AQCA ; SCOPE ENTRY POINT * 

.LIST 

;4444444*i*i44444*444444444444444**#4»4#4*4*4»444444444444444444444444444 
;TEST THAT RESET INSTRUCTION CLEARS TCCM 8IT9 


052777 001000 154500 &AQCA: 


3AGCB: 


3IS 

SRE5ET 

BIT 

BEO 

ERROR 

SCOPE 


#8I79.3TCCM 

•8IT9,3TCCM 

BAGCB 


SET TCCM 8IT9 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

SR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCCM BITS 
SCOPE. 


W a WWI «* * 

; 44444444444444444444444444444444**444444444*4444444444444444444444444444 


t 175: 175 ; ROUTINE NUMBER 175 * 

T175 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

ARCA ; SCOPE ENTRY POINT * 

.LIST 

; 4444444*444444444444444444444444**444*44*4444444444444444444444444444444 
: TEST THAT TCCM BIT10 CAN BE SET, AND CLEARED. 


| • w w ( 

ARCA: 


ERROR 

SCOPE 

aic 

BIT 


•BIT10.3TCCM 

•BIT10,3TCCM 

>5 


•BITIC.3TCCM 

•BITI0,3TCCM 

.+4 


ERROR 

SCOPE 


SET TCCM BIT IQ. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCCM SIT10 FAILED TO SET. 

CLEAR TCCM 3IT1Q. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

TCCM 8IT1Q FAILED TO CLEAR. 
SCOPE. 


W 9 WVVI fam * 


tl75: 175 ROUTINE NUMBER 175 * 

T177 ; ADDRESS OF NEXT ROUTINE 4 

10. ; TEST ITERATION COUNT 4 

BARCA ; SCOPE ENTRY POINT 4 

.LIST 

; 444444444444444444444444444444444444444444444444444444444444444444444444 
:TEST THAT RESET INSTRUCTION CLEARS TCCM BIT1Q 
&ARCA: BIS »BIT10,3TCCM ;SET TCCM 8IT10 

SRESET ; ISSUE RESET TO CLEAR BIT. 

BIT lBITiO,3TCCM ; SEE IF BIT IS CLEAR. 

BEO BARCB ' BR IF BIT IS CLEAR. 

ERROR ; RESET FAILED TO CLEAR TCCM BIT10 

BARCB: SCOPE ; SCOPE. 


; ROUTINE NUMBER 175 
; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


BARCB: 


SRESET 

BIT 

BEO 

ERROR 

SCOPE 


*BIT10,3TCCM 

BARCB 


; 444444444444444444444444444444444444444444444444444444444444444444444444 


fwcvil 27(732) 09-SEP-76 09:0b PAGE 5 & 


E05 


29^9 314334 3231 

IM 


T 177 : 


29% 

2997 

saaa 


2999 

3300 


3022 


3007 

3008 

3009 
3210 


3019 


3021 

3022 


3024 

3025 

3026 

nnor 

3028 

3029 

3030 

3031 

3032 

‘30*53 

W W WW 

3034 


2989 

?oan 


2991 

2992 

2993 

2994 


014344 

014352 

014360 

014362 

014364 

014366 

014374 

014402 

014404 

014406 

014410 

014412 

014414 

014416 


014420 

0144% 

0i«430 


UUi'IT 

14344 


0527^7 

232777 

001002 

104003 

m 


ASCA 

.LIST 


ROUTINE NUMBER 177 
SCOPE ENTRY POINT 


014440 

014442 


0CI4Q1 

104003 

104011 

00 .30 
014444 
000012 
014420 


052777 

104010 

032777 

001401 

104003 

104011 



:TEST 

THAT TCCM BITll CAN BE SET 

, AND CLEARED. 

1000 164434 

ASCA: 

BIS 

•BITll, 3TCCM 

; SET TCCM BITll. 

to 164426 


SIT 

•BITll, 3TCCM 

; SEE IF BIT IS SET. 



SHE 

.+6 

; BRANCH IF SET. 



ERROR 

cr nor 


; TCCM BITll FAILED TO SET. 

OQC 164412 


3IC 

•BITll, 3TCCM 

•CLEAR TCCM BITll. 

to 164404 


BIT 

•BITll, 3TCCM 

; SEE IF BIT IS CLEAR. 



BEG 

.*►4 

; BRANCH IF BIT IS CLEAR. 



ERROR 


; TCCM BITll FAILED TO CLEAR 



SCOPE 


; SCOPE. 


0040C0 164360 &ASCA 


km S km • 

T200: 200 ; ROUTINE NUMBER 200 * 

T201 ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

BASCA ; SCOPE ENTRY POINT * 

.LIST 

; TEST THAT RESET INSTRUCTION CLEARS TCCM BIT11 


004000 164350 


BASCB: 


SIS 

SRESET 

BIT 
BE 3 

ERROR 

SCOPE 


•enu,3TCCf1 

•BITll ,3TCCM 
BASCB 


SET TCCM 8IT11 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

3R IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCCM BITll 
SCOPE. 


**t*ttft***«ft*ft«ft***«***ft*****#*******#**t»****»*****#ftft********ft******** 


3311 

014444 

000201 

T201: 201 

; ROUTINE NUMBER 201 

* 

3012 

014446 

014520 

T2G2 

: ADDRESS OF NEXT ROUTINE 

* 

3013 

014450 

000144 

100. 

; TEST ITERATION COUNT 

* 

3014 

014452 

014454 

ATCA 

; SCOPE ENTRY POINT 

* 

3015 



.LIST 




014462 

014470 

014472 

014474 

014476 

014504 

014512 

014514 

014516 

014520 

014522 

014524 

014526 


052777 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

104003 

104011 

000202 

014554 

000012 

014530 


010000 

010000 


010000 

010000 


164324 

164316 


164302 

164274 


;«##ft#*#***#«*#**#*****««#ft#*ft«****«*********#«*************#»**»******** 
:TEST THAT TCCM BIT12 CAN BE SET, AND CLEARED. 


Ate A: 


SIS 

BIT 

BNE 

ERROR 

SCOPE 

aic 

BIT 

BEQ 

ERROR 

SCOPE 


•BIT12.3TCCM 

•BIT12,3TCCM 

.♦6 


•8IT12.3TCCM 

•BIT12,3TCCM 

.+4 


SET TCCM BIT12. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCCM BIT12 FAILED TO SET. 

Clear tccm ania. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

TCCM BIT12 FAILED TO CLEAR. 
SCOPE. 


W>VV1 h, • rfVVI km » 

‘ft*********************************************************************** 


t202: 202 ; ROUTINE NUMBER 202 * 

T203 ; ADDRESS OF NEXT ROUTINE * 

10. ;TEST ITERATION COUNT * 

BATCA ; SCOPE ENTRY POINT * 

.LIST 

;******4**************»*****«**********«**»*****4*******************»«»** 


TCI ~ TCH TEST 1 
DZTCAA.P11 
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FOB 


3035 

3 n"5L 
uao 

3037 

3033 

3039 

3040 

3041 

3042 

3043 

3044 

3045 

3045 

3047 

3048 

3049 

3050 

JL 

3052 

3053 

3354 

3055 

3055 

3057 

3053 

3059 

3050 


014530 

014535 

014540 

014545 

014550 

014552 

014554 
314555 
014550 
Q 14552 


014554 

014572 

014500 

014502 

014504 

014505 

014814 

014822 

014524 

014525 


052’ 
104010 
032777 
001401 
104003 
104011 

000203 

014530 

000144 

014584 


052777 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

104003 

104011 


Q 10000 
010000 


164250 

164240 


: TEST THAT RESET INSTRUCTION CLEARS TCCM BIT12 
&ATCA: 


IIS 

SRESET 


8ATCB: 


81 
BEQ 
ERROR 
SCOPE 


t8IT12,3TCCM 

#BIT12,3TCCM 

BATCB 


SET TCCM SI T 12 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

3R IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCCM BIT12 
SCOPE. 


wn i vm * to I to • 

:*mftftftM*«ftftftftft*«ft****ftMft****ftMft#ftM*ftft***ffftft**t*ft****ft***#ft*#*»***»4 


t203: 


020000 

020000 


020000 

020000 


164214 

164206 


164172 

164164 


203 
T2Q4 
100 . 

AUCA 
.LIST 

I************************************************************************ 

; TEST THAT TCCM BIT13 CAN BE SET, AND CLEARED. 


ROUTINE NUMBER 203 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


i * to to i 

AUCA: 


BIS 
BIT 
9NE 
ERROR 
SCOPE 
BIC 
BIT 
BEQ 
ERROR 
SCOPE 


iBIT13,3TCCM 

•BIT13,3TCCM 

.+6 


iBIT13,3TCCM 

IBIT13,3TCCM 

.+4 


SET TCCM BIT 13. 

SEE IF BIT IS SET. 

BRANCH IF SET. 

TCCM BITI3 FAILED TO SET. 

CLEAR TCCM BIT13. 

SEE IF BIT IS CLEAR. 

BRANCH IF BIT IS CLEAR. 

TCCM BIT 13 FAILEO TO CLEAR. 
SCOPE. 


;**ft***t****ft*******4*********#«i**4*»**********«***#****#***«4«********* 


3061 

014830 

000204 

T204: 204 

; ROUTINE NUMBER 204 

♦ 

3062 

014832 

014664 

T205 

; ADDRESS OF NEXT ROUTINE 

* 

3083 

014534 

000012 

10. 

;TEST ITERATION COUNT 

* 

3054 

014636 

014540 

BAUCA 

SCOPE ENTRY POINT 

* 

3065 



.LIST 




3056 

3067 

3088 

3069 

3070 

3071 

3073 

3074 

3075 

3076 
■5377 

3078 

3079 

3080 

3081 

3082 

3083 

3084 

3085 

3086 

3087 

3088 

3089 

3090 


014840 
014546 
014850 
014655 
01 4550 
014552 

014854 
01 4555 
014670 
014672 


014674 

014702 

014710 

014712 

014714 

014716 

014724 

014732 

014734 


052777 

104010 

032777 

001401 

104003 

104011 

000205 

014740 

000144 

014674 


052777 

032777 

001002 

104003 

104011 

042777 

032777 

001401 

104003 


020000 

020000 


164140 

164130 


I************************************************************************ 

iTEST THAT RESET INSTRUCTION CLEARS TCCM BIT13 


• * to *# * 

8AUCA: 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


*BIT13,3TCCM 


•BIT13,3TCCM 

BAUCB 


; SET TCCM 8IT13 
ISSUE RESET TO CLEAR BIT. 

; SEE IF BIT IS CLEAR. 

;BR IF BIT IS CLEAR. 

; RESET FAILEO TO CLEAR TCCM BIT13 
BAUCB: SCOPE ; SCOPE. 

;****ftlHt*****Mft*****#******JHHt***»*****««***m****»ft******#*#***»***«** 

t205: 205 ; ROUTINE NUMBER 205 * 

T206 ; ADDRESS OF NEXT ROUTINE * 

I 00. ; TEST ITERATION COUNT * 

AVCA ; SCOPE ENTRY POINT * 

.LIST 




J TEST THAT TCST BITO CAN BE 

SET, AND CLEARED. 

000001 

164102 

AVCA: BIS 

«BIT0,3TCST 

;SET TCST BITO. 

000001 

164074 

BIT 

iBIT0,3TCST 

{SEE IF BIT IS SET. 



BNE 

.+6 

BRANCH IF SET. 



ERROR 


;TCST BITO FAILED TO SET. 



SCOPE 



000001 

164060 

BIC 

«BIT0,3TCST 

{CLEAR TCST BITO. 

000001 

164052 

BIT 

>BITQ,3TCST 

;SEE IF BIT IS CLEAR. 



BEQ 

.+4 

iBRANCH if bit IS CLEAR. 



ERROR 


•TCST BITO FAILEO TO CLEAR. 
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1 

i TCI - ' 

TC11 TEST 

1 

A 

i DZTCAA, 

.Pll 


I 3091 

314735 

104011 

! 



■ SIh 

31 4740 
□14742 


1 3095 

014744 

000012 

? 3095 

014745 

014750 

309" 



' 3093 



3099 



^ : nn 

i w 

314750 

352777 

3131 

014755 

104010 

3132 

314750 

332777 

2,33 

014755 

0014Q1 

i 3134 

014770 

104003 

3135 

014772 

104011 

! 3135 



1 310" 

014774 

000207 

i 3103 

014775 

01 5050 

5 3,39 

015000 

000144 

1 *?* • -) 

* W- m w 

1 3111 

015002 

015004 

i 3112. 
| 3113 



| 3119 

015004 

052777 

I 3115 

015012 

032777 

| 3115 

315020 

001302 

i 3117 

015022 

104003 

3118 

015024 

104011 

1 3119 

015028 

042777 

1 3120 

015034 

032777 

I 3121 

Q150H2 

0014Q1 

3122 

015044 

104003 

1 3123 

1 *5 \ Oil 

0150% 

104011 

4 Jk "Sm * 

I 3125 

015050 

300210 

3125 

015052 

015104 

! -> ■< zrr 

015054 

000012 

3128 

015058 

Cl 5080 

! 3129 



\ 31-30 



■j % | 4 i 

1 WA'Ui 

3132 

015050 

052777 

! 3133 

015058 

104010 

i 3134 

015070 

032777 

; 31 Ac 

015078 

0014D1 

! 3135 

015100 

104003 

i 3137 

015102 

104011 

1 3138 



"'39 

015104 

000211 

| 3140 

015108 

015132 

j 3141 

015110 

000144 

| 31?2 

015112 

015114 

i - • 4-3 

•i W 4t» * -•mf 



; 3144 



3145 



; 3148 

015114 

032777 


000001 

000001 


000002 

000002 


000002 

000002 


183772 

183784 


183750 

183742 


000002 

000002 


183718 

183708 


G05 


SCOPE ; SCOPE. 


t 208 : 


fS I? 


ROUTINE NUMBER 208 
AODRESS OF NEXT ROUTINE 
10. ; TEST ITERATION COUNT * 

8 AVCA ; SCOPE ENTRY POINT * 

.LIST 

;***##*#*****###*****###*#***####**###*#**#**##**♦**#**********#*#******* 
: TEST THAT RESET INSTRUCTION CLEARS TCST BITQ 


184028 DAVCA: 


184018 


BAVCB: 


BIS 

SRESET 

SIT 

3EQ 

ERROR 

SCOPE 


•BITQ,3TCST 

•BITQ,3TCST 

BAVCB 


SET TCST 8IT0 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCST BITO 
SCOPE. 


ft*********************************************************************** 


t207: 207 ; ROUTINE NUMBER 207 * 

T210 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AWCA ; SCOPE ENTRY POINT * 

.LIST 

rift********************************************************************** 

•TEST THAT TCST BIT1 CAN BE SET, ANO CLEAREO. 

&ICA: BIS *BIT1,3TCST ;SET TCSi BIT 1 . 

RTT *RTT1 aTr.QT -PPP TP ATT TA APT 


BIT 

BNE 

ERROR 

SCOPE 

aic 

BIT 

9EQ 

ERROR 

SCOPE 


*8IT1,3TCST 

.+8 


•BITi,3TCST 

»BIT1,3TCST 

.+4 


SEE IF BIT IS SET. 

BRANCH IF SET. 

TCST 3IT1 FAILED TO SET. 

CLEAR TCST BITi, 

SEE IF BIT IS CLEAR. 
BRANCH IF BIT IS CLEAR. 
TCST BITi FAILED TO CLEAR. 

SCOPE. 


ft*********************************************************************** 


t 210 


210 

T211 

IQ. 

3 AWCA 
.LIST 


ROUTINE NUMBER 210 
AODRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


;#*4Httt*********ft*********ft*#«*t*************************«********#ft****** 
;TEST THAT RESET INSTRUCTION CLEARS TCST BITI 


&AUCA: 


BAWCB 


BIS 

SRESET 

BIT 

BEQ 

ERROR 

SCOPE 


»BIT1,3TCST 

•BITI ,3TCST 
BAUCB 


SET TCST BITi 

ISSUE RESET TO CLEAR BIT. 

SEE IF BIT IS CLEAR. 

BR IF BIT IS CLEAR. 

RESET FAILED TO CLEAR TCST BITI 
SCOPE. 


tSl 1 : 211 : ROUTINE NUMBER 211 * 


000200 183884 


TSl 1 : 211 ; ROUTINE NUMBER 211 * 

T212 ; ADDRESS OF NEXT ROUTINE * 

100. ; TEST ITERATION COUNT * 

AXCA ; SCOPE ENTRY POINT * 

.LIST 

;*«*******«******************««**#**********#***********»**************** 
: TEST THAT TCCM BIT7 IS SET FOLLOWING RESET INSTRUCTION. 

&XCA: BIT #BIT7,3TCCM ;SEE IF TCCM BIT7 IS SET. 


i 
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3147 

015122 

001001 



9NE .+4 

; BRANCH IF BIT IS SET. 

3148 

015124 

104003 



ERROR 

; TCCM BIT7 NOT SET AFTER RESET. 

3148 

015125 

104Q10 



SRESET 

ISSUE RESET. 

3150 

015130 

104011 



SCOPE 

; SCOPE . 

3151 





: ************************************************************************ 

3152 

015132 

000212 



T212: 212 

; ROUTINE NUMBER 212 * 

3153 

015134 

015150 



T213 

; ADDRESS OF NEXT ROUTINE * 

3154 

015135 

000012 



10, 

TEST ITERATION COUNT * 

3155 

015140 

015142 



AYCA 

; SCOPE ENTRY POINT * 

3155 





.LIST 


3157 





j************************************************************************ 

3158 





:TEST THAT TCCM BIT15 IS CLEAR FOLLOWING A RESET INSTRUCTION. 

3153 

015142 

032777 

100000 

153535 

AYCA: BIT *BIT15,3TCCM 

; SEE IF TCCM BIT15 IS CLEAR 

3150 

015150 

Q0140i 



BEG . +4 

; BRANCH IF BIT IS CLEAR. 

3151 

015152 

104003 



ERROR 

; TCCM BIT 15 NOT CLEAR AFTER RESET. 

3152 

015154 

104010 



SRESET 

; ISSUE RESET. 

3153 

015155 

104011 



SCOPE 

: SCOPE 

3154 





I************************************************************************ 

3155 

015150 

01)0213 



T213: 213 

; ROUTINE NUMBER 213 * 

3155 

015152 

015205 



T214 

; ADDRESS OF NEXT ROUTINE * 

3157 

015154 

000012 



10. 

; TEST ITERATION COUNT * 

3153 

015155 

015170 



AZCA 

; SCOPE ENTRY POINT * 

i 3159 





.LIST 


3170 





it********************************* ************************************** 

317] 





;TEST THAT TCST BIT7 IS CLEAR FOLLOWING A RESET INSTRUCTION. 

3172 

015170 

032777 

000200 

153505 

AZCA: BIT *BIT7,3TCST 

; SEE IF TCST BIT7 IS CLEAR 

3173 

015175 

001401 



BEQ .+4 

; BRANCH IF BIT IS CLEAR. 

3174 

015200 

104003 



ERROR 

•TCST BIT7 NOT CLEAR AFTER RESET. 

3175 

015202 

104010 



SRESET 

; ISSUE RESET. 

3175 

3177 

015204 

104011 



SCOPE : SCOPE 

I************************************************************************ 

3178 

015205 

000214 



T214: 214 

; ROUTINE NUMBER 214 * 

■3: ~q 

015210 

015234 



1215 

; ADDRESS OF NEXT ROUTINE * 1 

3180 

015212 

000012 



10. 

;T£ST ITERATION COUNT * 

3181 

015214 

015215 



AADA 

; SCOPE ENTRY POINT * 

• 3132 





.LIST 


3183 





;***********»******************#***************************************** 

1 3134 





:TEST THAT TCST BIT8 IS CLEAR FOLLOWING A RESET INSTRUCTION. 

3185 

015215 

032777 

000400 

153550 

AADA: BIT *BIT8,3TCST 

; SEE IF TCST BITS IS CLEAR 

sm 

015224 

1X31401 



BEQ .+4 

; BRANCH IF BIT 15 CLEAR. 

3187 

015225 

104003 



ERROR 

TCST BIT8 NOT CLEAR AFTER RESET. 

3188 

015230 

10.010 



SRESET 

: ISSUE RESET. 

3188 
i 3190 

015232 

104011 



SCOPE : SCOPE j 

• ************************************************************************ ! 

i 3191 

015234 

000215 



T215: 215 

; ROUTINE NUMBER 215 * 

! 3132 

0152% 

015252 



T21B 

; ADDRESS OF NEXT ROUTINE * 

j 3133 

015240 

000012 



10. 

; TEST ITERATION COUNT * 

3134 

015242 

015244 



ABDA 

; SCOPE ENTRY POINT * 

! 3135 





.LIST 


! 31% 





;************************************************************************ 

! 3137 





:TEST THAT TCST BIT9 IS CLEAR 

FOLLOWING A RESET INSTRUCTION. 

j 3138 

015244 

032777 

00100C 

153532 

ABDA: BIT »BIT9,3TCST 

; SEE IF TCST BIT9 IS CLEAR 

1 2133 

015252 

001401 



BEQ .+4 

; BRANCH IF BIT IS CLEAR. 

3200 

015254 

104003 



ERROR 

•TCST BIT9 NOT CLEAR AFTER RESET. 

3201 

015255 

104010 



SRESET 

•ISSUE RESET. 

i 3202 

! 

I 

i 

! 

1 

015250 

104011 



SCOPE 

; SCOPE 
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3203 



3204 

015252 

000215 

3205 

015254 

015310 

320b 

015255 

000012 

015272 

3207 

015270 

3209 



3209 



3210 



3211 

015272 

032777 

3212 

015300 

001401 

I'D 1 1 

015302 

104003 

2214 

015304 

104010 

3215 

01 5305 

104011 

321b 



3217 

015310 

000217 

3219 

015312 

015335 

3219 

015314 

000012 

3220 

015315 

015320 

3221 






3223 



3224 

015320 

032777 

3225 

01532b 

001401 

"P?S 

015330 

104003 

3227 

015332 

104010 

3228 

015334 

104011 

3229 



3230 

01533b 

000220 

3231 

015340 

015354 

3232 

015342 

000012 

3233 

015344 

015345 

3234 



3235 



323b 




01534b 

032777 

001401 

3233 

015354 

3239 

01535b 

104003 

3240 

015350 

104010 

3241 

015352 

lQHOii 

3242 



3243 

015354 

000221 

3244 

015355 

015412 

3245 

015370 

000012 

324b 

015372 

015374 

3247 



3248 



3249 



3250 

015374 

032777 

3251 

015402 

001401 

3252 

015404 

104003 

3253 

015405 

104010 

3254 

015410 

104011 

3255 



325b 

C15412 

000222 

3257 

015414 

015434 

3258 

015415 

023420 
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;*************####*«##*#***#*«************************##*#**#**♦******* 
t21b: 


21b 

; ROUTINE NUMBER 21b 

* 

T217 

; ADDRESS OF NEXT ROUTINE 

* 

10. 

; TEST ITERATION COUNT 

* 

ACDA 

; SCOPE ENTRY POINT 

* 

.LIST 




7 002000 1S3504 ACDA: 


;mH****«*«H**«***««**m*«**«*HHH**«H**»**«**«HH*««* 
TEST THAT TCST BIT10 IS CLEAR FOLLOWING A RESET INSTRUCTION. 


BIT 
3EQ 
ERROR 
SRESET 
SCOPE 


»BIT10,3TCST 
. +4 


SEE IF TCST BIT10 IS CLEAR 


020000 1S3455 ADDA: 


BRANCH IF BIT IS CLEAR. 

TCST 8ITI0 NOT CLEAR AFTER RESET. 

ISSUE RESET. 

SCOPE 

;HH#»»*««***«««****«****i*****«*«*«H*«l**H*l»««H«««** 

t2l7: 217 ; ROUTINE NUMBER 217 * 

T220 ; ADDRESS OF NEXT ROUTINE * 

10. ; TEST ITERATION COUNT * 

ADDA ; SCOPE ENTRY POINT * 

.LIST 

;*****#*****#*#********♦#*****«**«**********#*#******#***##*#**##**#♦** 
:TEST THAT TCST BIT13 IS CLEAR FOLLOWING A RESET INSTRUCTION. 


BIT 
BEQ 
ERROR 
SRESET 
SCOPE 


«BIT13,3TCST 
.+4 


SEE IF TCST 8IT13 IS CLEAR 
BRANCH IF BIT IS CLEAR. 

T CSI BIT13 NOT CLEAR AFTER RESET. 

ISSUE RESET. 

SCOPE 


avvi b I WWI w 

********************************* **************************** 


t220 


; ROUTINE NUMBER 220 
; ADDRESS OF NEXT ROUTINE 
; TEST ITERATION COUNT 
; SCOPE ENTRY POINT 


040000 lb3430 AEDA: 


220 
T221 
10 . 

AEDA 
.LIST 

;»*******»*«******************«***************************************»* 
TEST THA T TCST BIT14 IS CLEAR FOLLOWING A RESET INSTRUCTION. 


BIT 

BEQ 

ERROR 

SRESET 

SCOPE 


#BIT14,3TCST 
.+4 


SEE IF TCST 9IT14 IS CLEAR 
BRANCH IF BIT IS CLEAR. 

TCST BIT14 NOT CLEAR AFTER RESET. 

ISSUE RESET. 

SCOPE 




t221: 


100000 lb3402 AFDA: 


221 
T222 

10 . 

AFDA 
.LIST 

•ft********************************************************************** 
TEST THAT TCST BIT1S IS CLEAR FOLLOWING A RESET INSTRUCTION. 


ROUTINE NUMBER 221 
ADDRESS OF NEXT ROUTINE 
TEST ITERATION COUNT 
SCOPE ENTRY POINT 


BIT 
BEQ 

ERROR 

SRESET 

SCOPE 


•BIT1S,3TCST 
.♦4 


; SEE IF TCST BIT15 IS CLEAR 
; BRANCH IF BIT IS CLEAR. 

;TCST BIT15 NOT CLEAR AFTER RESET. 

; ISSUE RESET. 

.. ; SCOPE 

t222: 222 ; ROUTINE NUMBER 222 * 

T223 ; ADDRESS OF NEXT ROUTINE * 

10000. ; TEST ITERATION COUNT * 
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3259 

3250 

3251 

3252 

3253 

3254 


01 5420 0154c 


CAAA ; SCOPE ENTRY POINT * 

.LIST 

;*****#***m************************************************************ 
:TEST ABILITY TO SET RANDOM NUMBERS IN DATA REGISTER. 

CAAA: MOV TCDT, REGADR ;ADDR OF TCDT REG TO REGADR. 

JMP CXXA 

:*#)Ht*******ft*ft*«JHt«******M*ft*ft*******»************************#******«* 


3253 

3269 

%«#%■> ^ 4»J 

3271 

3272 

3273 


3273 

3279 

3230 

3231 


Q15 u 22 

015430 

015434 
015435 
01 5440 
015442 


015444 

015452 

015456 

015460 

015462 

015464 


016757 

Q00167 

000223 

015456 

023420 

015444 


016767 

000167 

000224 

015572 

023420 

015466 


163366 

000040 


000114 


163340 

000016 


000072 


t223: 223 ; ROUTINE NUMBER 223 * 

T224 AODRESS OF NEXT ROUTINE * 

10000. ;TEST ITERATION COUNT * 

CB3A {SCOPE ENTRY POINT * 

.LIST 

;****************************«#************«***************************** 
:TEST ABILITY TO SET RANDOM NUMBERS IN WORD COUNT REGISTER. 

6BBA: MOV TCWC.REGAOR ;ADDR OF TCWC REG TO REGADR. 

JMP CXXA 

;*»***HHt**$£*4HHHt4********1Ht#***#****?*)HH**#*#****ft********************* 
t224: 224 {ROUTINE NUMBER 224 * 

T225 {ADDRESS OF NEXT ROUTINE * 

10000. {TEST ITERATION COUNT * 

CCCA {SCOPE ENTRY POINT * 

.LIST 

I************************************************************************ 


3282 





:TEST 

ABILITY 

TO SET RANDOM NUMBERS IN BUS ADDRESS REGISTER. 

3283 

‘TSd.CiLl 

015455 

016767 

163320 

000050 

tCCA: 

MOV 

TCBA, REGADR 

;ADDR OF TCBA REG TO REGADR. 

%Jco t 
3285 

015474 

017767 

000044 

163364 

CXXA: 

MOV 

3REGADR, PRVCNT 

{SAVE CURRENT REG CONTENTS. 

3286 

015502 

004767 

164442 



JSR 

PC , RNGEN 

{GENERATE RANDOM NUMBER. 

3287 

015506 

010067 

163356 



MOV 

RO, RNDNMB 

{SAVE RANDOM NUMBER. 

3288 

015512 

010077 

000026 



MOV 

R0.3REGADR 

{MOVE RANDOM NUMBER TO TEST REGISTER. 

3289 

015516 

027767 

000022 

163344 


CMP 

SR^GAOR , RNDNMB 

{CHECK RANOOM « AND REG CONTENTS. 

3290 

015524 

001421 




3EQ 

CXXX 

;BR IF BOTH SAME. (OK). 

3291 

015526 

004567 

165130 



JSR 

R5.0ACNV 

{CONVERT EXPECTED CONTENTS TO ASCII. 

3292 

015532 

001070 




RNDNMB 



3293 

015534 

003160 




AASB 



3294 

015536 

090006 




6 



3295 

015540 

004567 

165116 



JSR 

R5,0ACNV ; 

CONVERT CONTENTS OF TEST REG TO ASCII. 

3296 

015544 

000000 



REGADR 

: OPEN 


;ACDR OF TEST REG IS STORED HERE. 

3297 

015546 

003176 




AWAS 



3299 

015550 

000006 




6 



3299 

015552 

004567 

165104 



JSR 

RS t OACNV ; 

{CONVERT PREVIOUS REGISTER CONTENTS TO i 

3300 

015556 

001066 




PRVCNT 



3301 

015560 

003224 




APWAS 



3302 

015562 

000006 




6 



3303 

015564 

104014 




ERROR 1 

$ 

CONTENTS OF REG NOT SAME AS DATA THAT 

3304 

015566 

003137 




ERDAT 

« 

1 

PROGRAM TRIED TO LOAD. 

3305 

015570 

104011 



CXXX: 

SCOPE 

! 

SCOPE. 


3306 

3307 015572 000225 

3308 015574 177777 

3309 015576 000001 

3310 015600 015602 

3311 

3312 
331" 3 

3314 015602 104011 


000225 

177777 

000001 

015602 


;«*****«****«****************«*****»************************************* 
t225: 225 {ROUTINE NUMBER 225 * 

TLA5T {ADDRESS OF NEXT ROUTINE * 

I {TEST ITERATION COUNT * 

ZZ2A {SCOPE ENTRY POINT * 

.LIST 

;*****v ****************************************************************** 

•DUMMY END TEST. 
iZZA: SCOPE 


ON 


K05 
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TCAA.Pil 


i 

I 


3315 


000001 


.END 
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1 

MACYil 2 

7(732) 

D2TCAA 

.Pi i 

CROSS 

REFERENCE 

TABLE 

AAA 

003624 


994 

998# 

AAB 

0Q364Q 


993 

100)# 

AA3A 

006776 


1736 

1740# 

AACA 

012516 


2569 

2572# 

AACB 

012E36 


2574 

2578# 

AADA 

015216 


31B1 

3185# 

AASB 

003160 


698 

920# 

ASA 

003656 


1003 

1012# 

ABB 

003672 


1012 

1015# 

ABBA 

007106 


1768 

1772# 

ABCh 

012554 


2582 

2586# 

ABCB 

012574 


2598 

2590# 

ABDA 

015244 


3194 

3198# 

ACA 

003710 


1022 

1026# 

AC3 

003724 


1026 

1029# 

ACBA 

0072 16 


1800 

1804# 

ACCA 

012612 


2596 

2600# 

ACCB 

012632 


2602 

2604# 

ACDA 

015272 


3207 

3211# 

ADA 

003742 


1036 

1040# 

403 

003756 


1040 

1043# 

AOBA 

007326 


1832 

1836# 

AOCA 

012650 


2610 

2614# 

AOCB 

012670 


2616 

2618# 

hODA 

015320 


3220 

3224# 

AEA 

003774 


1050 

1054# 

AEB 

004010 


1054 

1057# 

AEBA 

007436 


1364 

1868# 

AECA 

012706 


2624 

2628# 

AECB 

012726 


2630 

2632# 

AEDA 

015346 


3233 

3237# 

AFA 

004Q26 


1064 

1068# 

AFBA 

007546 


1896 

1900# 

AFCA 

012744 


2638 

2642# 

AfCB 

012764 


2644 

2646# 

AF9A 

015374 


3246 

3250# 

AGA 

004 i 36 


1096 

1100# 

AGBA 

007656 


1928 

1932# 

AGCA 

013002 


2652 

2656# 

AGCB 

013022 


2658 

2660# 

AHA 

004246 


1128 

1132# 

AHBA 

007766 


i960 

1964# 

AHCA 

013040 


2666 

2670# 

AHCB 

013060 


2672 

2674# 

AIA 

004356 


1160 

1164# 

AI9A 

010076 


1992 

1996# 

AICA 

013076 


2680 

2684# 

AICB 

013116 


2686 

2688# 

AICNT 

003127 


725 

915# 

AINCRT 

003271 


588 

935# 

AJA 

004466 


1192 

1196# 

AJBA 

010206 


2024 

2028# 

AJCA 

013134 


2694 

2698# 

AKA 

004576 


1224 

1228# 

AKBA 

010316 


2056 

2060# 

AKCA 

013244 


2726 

2730# 
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CROSS 

REFERENCE 

TABLE 

ALA 

00470b 


1258 

1280# 

ALBA 

01042b 


2088 

2092# 

ALCA 

013354 


2758 

2782# 

AMA 

00501b 


1288 

1292# 

AM8A 

01053b 


2120 

2124# 

AMCA 

013484 


2790 

2794# 

ANA 

00512b 


1320 

1324# 

ANBA 

0108% 


2152 

2158# 

ANCA 

013574 


2822 

2828# 

AOA 

005238 


1352 

1358# 

A08A 

01075b 


2184 

2188# 

AOCA 

013704 


2854 

2858# 

APA 

005348 


1384 

1388# 

APBA 

011088 


2218 

2220# 

APC 

003112 


721 

912# 

APCA 

014014 


2888 

2890# 

APGEND 

003310 


814 

938# 

APUAS 

003224 


927* 

3301 

AQA 

005458 


1418 

1420# 

AGBA 

011178 


2248 

2252# 

AQCA 

014124 


2918 

2922# 

ARA 

005588 


1448 

1452# 

ARBA 

011308 


2280 

2284# 

ARCA 

014234 


2950 

2954# 

ASA 

005878 


1480 

1484# 

ASBA 

011418 


2312 

2318# 

A5CA 

014344 


2982 

2988# 

ASETSR 

003233 


878 

929# 

ATA 

008008 


1512 

1518# 

AT8A 

011528 


2344 

2348# 

ATCA 

014454 


3014 

3018# 

ATNUMB 

003102 


| ** 

/ 1 i 

910# 

AUA 

008118 


1544 

1548# 

AU8A 

011838 


2378 

2380# 

AUCA 

014584 


3048 

3050# 

AVA 

008228 


1578 

1580# 

AV8A 

011748 


2408 

2412# 

AVCA 

014874 


3078 

308? a 

AUA 

008338 


1808 

1812# 

AUA 5 

003178 


894 

923#. 

AUBA 

012058 


2440 

2444# 

AWCh 

015004 


3110 

3114# 

AXA 

008445 


1840 

1844# 

AK8A 

012188 


2472 

2478# 

AXCA 

015114 


3142 

3148# 

AYA 

008558 


1872 

1878# 

AYBA 

012278 


2504 

2508# 

AYCA 

015142 


3155 

3159# 

AZA 

008888 


1704 

1703# 

AZBA 

012408 


2538 

2540# 

AZCA 

015170 


3188 

3172# 

8AA8A 

007052 


1754 

1758# 

8AA88 

007074 


1781 

1783# 

BA88A 

007182 


1788 

1790# 

BABBS 

007204 


1793 

1795# 

BACBA 

007272 


1818 

1822# 


MOB 

08-SEP-78 09:0b PAGE bS 
- USER SYMBOLS 


3297 



1 TCI - 
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27('38« 

! :tZT AA.Pll CROSS REFERENCE 

TABLE 

1 bacbs 

001314 

1985 

1887a 

BA08A 

007408 

1850 

1954# 

j 3ADS8 

007484 

1857 

1859a 

i 3AE8A 

007518 

1888 

1886 a 

8AE88 

007534 

1389 

1891 a 

! 89*4 

004108 

1088 

1086 a 

! BAFB 

004184 

1089 

1091 a 

1 BAFBA 

007588 

1914 

1918a 

| BAF88 

007844 

1981 

1923 a 

I 9AGA 

004818 

1114 

1118a 

! BAGS 

004834 

1181 

U83a 

8AG9A 

007738 

1948 

1950 a 

3AG9B 

007754 

1953 

1955 a 

1 BAHA 

004388 

1148 

1150 a 

BAHB 

004344 

1153 

1155a 

BAH8A 

010048 

1979 

1988 a 

8AM98 

010084 

1985 

1987 a 

SAIA 

01)4438 

1178 

1188a 

3AI3 

004454 

1 1HS 

1197a 

BAIBA 

010158 

8010 

8014a 

BAI8G 

010174 

801.7 

8019a 

BAJA 

0045^8 

1810 

1814a 

ba;b 

004584 

1817 

1819a 

J BAIBA 

010888 

3048 

8046 a 

8AJ89 

010304 

8049 

8051 a 

BAJCA 

013810 

8718 

8718a 

BAJ'S 

013838 

8719 

8781 a 

BAKA 

004558 

1848 

1846a 

i 9AK8 

■004874 

1849 

1851 a 

BAKBA 

01037? 

8074 

8078 a 

! 8AKB8 

01 04 14 

8081 

8083 a 

r-CA 

013380 

8744 

8748 a 

SAKC 8 

013342 

8751 

8753 a 

j 8AC4 

004788 

1874 

1878# 

1 BA-3 

005004 

1881 

1883 a 

i BAlBA 

010508 

81 08 

8110a 

9A„38 

010584 

81! 3 

8115a 

SAL C A 

013430 

8778 

8780# 

8ALC8 

013458 

8783 

8785# 

' BAMA 

005078 

U06 

1310# 

I s-m 

005114 

1313 

1315# 


010818 

8138 

8142# 

BAN.88 

010834 

8145 

2147a 

SAME A 

013540 

8803 

2812# 

6AMCS 

013588 

8815 

2817# 

BANA 

005808 

1338 

1342# 

6ANB 

005224 

1345 

1347# 

BANBA 

010788 

8170 

2174# 

SANSS 

010744 

8177 

2179# 

BANC A 

013850 

8840 

2844# 

BANC8 

013878 

8847 

2849# 

BAOA 

005312 

. 1370 

1374# 

BAOB 

005334 

1377 

1379# 

BAOBA 

011038 

2808 

2206# 

BAOBB 

011054 

2209 

2211# 

1 BAOCA 

013780 

2872 

2876# 
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TABLE - 
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014003 

3379 

283 it 


005433 

1403 

1405 1 


005444 

1409 

14111 


011143 

W km W « 

2239 • 


011154 

30 U f 

km 4*» f A 

3243 • 


014Q7Q 

3904 

2909 1 


014113 

2911 

29131 


005533 

1434 

14391 


005554 

1441 

14431 


011353 

2255 

22731 


01131*4 

2373 

22751 


01 4300 

2935 

29401 


014333 

3943 

2945 * 


Q0S543 

1455 

14701 


005554 

1473 

1475« 


011353 

2398 

23021 


31 140* 

3305 

23071 


014310 

2958 

29721 


014333 

29'S 

29771 


005753 

1493 

15021 


005774 

1505 

15071 


011473 

3330 

23341 


011514 

3337 

23391 


014430 

3000 

30041 


014443 

3007 

30091 


005052 

1530 

15341 


005104 

1537 

15391 


011502 

3353 

23551 


01 1.534 

2359 

23711 


014530 

3032 

30351 


014553 

3039 

3Q411 


005173 

1552 

15551 


005214 

1559 

15711 


011712 

2394 

23981 


011734 

3401 

24031 


01454Q 

3054 

30591 


014553 

3071 

30731 


005303 

1594 

15981 


005334 

1501 

I503i 


013023 

2425 

24301 


013044 

2433 

243S1 


014750 

3095 

31001 


014773 

3103 

3105* 
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3AY5® 012374 

2529 

3A2A 008742 

rz?. 

8AZ8 008784 

1729 

3A29A 012482 

mm 012504 

2554 

2581 

80CNV 002788 

723 

bdcnva 0030 % 

982* 

B0CNV8 003010 

883* 

iB m 

884 

898* 

BELL = 000007 

497* 

BITO = OOOOOl 

477* 
3 non 

3IT1 r 000002 

CUDU 

478* 


1800 


2749 

BITiO = Q0200Q 

487* 


1988 


3211 

8IT11 = 004000 

488* 

i 

1920 

| 91 T 12 = 010000 

485* 


2444 

BIT13 = 020000 

484* 

1982 


3070 

8IT14 = 040000 

483* 


2018 

BIT15 = 100000 

481 


2048 

BIT2 = Q00Q04 

475* 


2124 

BIT3 = 000010 

474* 


2158 

BIT4 r 000020 

473* 


2188 

BIT5 = 000040 

472* 


2220 

aiTs s oooioo 

471* 


2252 

BIT? = 000200 

470* 


2284 

31 IB = 000400 

489 


2318 

BIT9 = 301000 

488* 


1842 


2940 

BMOVA 002754 

871* 

anCVE 003744 

819 

| CAAA 015422 

3259 

CARttSK 001052 

527* 

CB8A 015444 

3289 

CC = 177778 

458* 

CCCA 015488 

3279 

CHAINN 001272 

555 

CHALT = 104005 

548* 


i 
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2531 » 

1726* 

F31# 

2559 * 

2563 # 

87?* 

892 

88S 

887* 

898 


502 

1083 

1089 

1073 

3082 

3083 

3097 

3088 

501 

1100 

1101 

1105 

2092 

2093 

2097 

2098 

2750 

3114 

3115 

3119 

80S 

1388 

1389 

1393 

2380 

2381 

2385 

2386 

600 

1420 

1421 

1425 

2412 

2413 

2417 

2418 

1452 

1453 

1457 

1458 

2445 

2449 

2450 

2482 

500 

711 

1484 

1485 

1984 

2478 

2477 

2781 

3224 




597 

1518 

1517 

1521 

2508 

2509 

2513 

2514 

482* 

1548 

1549 

1553 

2540 

2541 

2545 

2548 

1132 

1133 

1137 

1138 

2125 

2129 

2130 

2142 

1164 

1185 

1189 

1170 

2157 

2181 

2182 

2174 

11% 

1197 

1201 

1202 

2189 

2193 

2194 

2208 

1228 

1229 

1233 

1234 

2221 

2225 

2228 

2233 

1280 

1281 

1285 

22^0 

2253 

2257 

2258 

1292 

1293 

1297 


2285 

2289 

2290 

230c 

1324 

1325 

1329 

1330 

2317 

2321 

2322 

2334 

577 

809 

974 

1358 

1854 

1858 

2348 

2349 

2942 

3198 




873 

887* 

3283* 


3273* 

3283* 

591* 

589 877 980 


C06 

88 


1074 

1088 

1098 

3100 

3102 


1108 

1118 

1120 

2110 

2112 

2898 

3120 

3132 

3134 

1394 

1408 

1408 

2398 

2400 

2954 

1428 

1438 

1440 

2430 

2432 

2988 

1470 

1472 

1932 

2484 

3018 

3019 

1489 

1490 

1502 

2482 

2494 

24% 

1522 

1534 

1536 

2528 

2528 

323? 

1554 

1588 

1568 

2558 

2580 

3159 

1150 

1152 

1612 

2144 

2730 

2731 

118c 

1194 

1644 

2178 

C ( DC 

2783 

1214 

1218 

1678 

2208 

2794 

2795 

1248 

1248 

1708 

2240 

2826 

2827 

1740 

1278 

1280 

2272 

2858 

2859 

1310 

1312 

1 772 

2304 

3148 

3172 

1342 

1344 

1804 

2338 

2890 

2891 

1357 

1381 

1362 

2353 

2354 

2386 


2060 

2061 

2065 

1580 

1581 

1585 

2899 

2703 

2704 

1888 

1869 

1873 

2955 

2959 

2960 

1900 

1901 

1905 

2987 

2991 

2992 

1933 

1937 

1938 

3023 

3024 

3036 

1504 

1964 

1965 

3050 

3051 

3055 

1996 

1997 

2001 

2028 

2029 

2033 

3250 



1813 

181? 

1818 

2735 

2736 


1645 

1849 

1650 

278? 

2768 

2780 

1677 

1681 

1682 

2799 

2800 

2812 

1709 

1713 

1714 

2831 

2832 

2844 

1741 

1745 

1748 

2863 

2864 

2876 

1773 

1777 

1778 

1805 

1809 

1810 

2895 

28% 

2908 

1374 

1376 

1336 

2368 

2922 

2923 


2066 

2078 

1586 

1598 

2716 

2718 

1874 

1888 

2972 

2974 

1906 

1918 

3004 

3006 

195Q 

3038 

1952 

1969 

1970 

3056 

3068 

2002 

2014 

2034 

2046 

1630 

1632 

1632 

2782 

1864 j 

1694 
2814 - 

16% | 

1728 

1728 \ 

2346 

\ 

1758 

1760 j 

2878 

1 

1790 

1792 

1822 

1824 

2910 

3185 

1837 

1341 

292? 

2929 
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CHIT 

001708 

547 

680* 












CHNA 

001338 

599 

600* 












CHNAA 

001354 

SOI 

604* 












CHNAB 

001334 

599* 

603 





* 


i 





CHNAC 

001324 

595 

597* 












CNN8 

001374 

808 

609* 












CRBUF 

001048 

525* 

690 

693 











CR8UFA 

001050 

528* 

690 

697 











CTRA 

001058 

529* 













CTR9 

001080 

530* 













CIRC 

001082 

531* 













GIRO 

001084 

532* 













CURTST 

001042 

523* 

579 

584 

626* 










CXXA 

015474 

3284 

3274 

3285# 











CXXX 

015570 

3290 

3305* 












DATCHKr 

104004 

548* 













DECVAL 

00307Q 

979 

90S* 












DELAY = 

104015 

564* 

805 












DLCNT 

002434 

788* 

783 

798* 











DLY 

002372 

563 

786* 












DLYA 

002412 

790* 

795 












QLYB 

1X52418 

791* 

792 












DO = 

000001 

502* 

981 












DTCHK 

001732 

545 

690* 












DTCHKA 

001772 

691 

702* 












EHALT = 

104007 

552* 

731 












EHLT 

001720 

551 

685* 












ehlta 

001730 

686 

698* 












EMTINT 

001510 

448 

630* 












EMTTAB 

001074 

536* 

634 












EMTV 

000030 

443* 













EMTX = 

000018 

503* 

538* 

540# 

542# 

544# 

546* 

548# 

550# 

552* 

554# 

556# 

558* 

560 



562* 

564* 












END ‘ 

003078 

728 

909* 












ERCTR 

001054 

528* 













ERDAT 

1X53137 

701 

917# 

3304 











ERR 

001774 

543 

7Q3* 












ERRA 

002944 

706 

711# 












ERRB 

002130 

703* 

704* 

707* 

708* 

709* 

729# 








ERRC 

002134 

712 

731* 












ERRD 

002144 

713* 

714* 

720 

734# 










ERRE 

002146 

705# 

710* 

732 

735# 










ERROR = 

104003 

544* 

1001 

1015 

1029 

1043 

1057 

1071 

1076 

1090 

1103 

1103 

1122 

1135 



1140 

1154 

1167 

1172 

1186 

1199 

1204 

1219 

1231 

1236 

1250 

1263 

1269 



1282 

1295 

1300 

1314 

1327 

1332 

1346 

1359 

1364 

1378 

1391 

1396 

1410 



1423 

1428 

1442 

1455 

146J 

1474 

1487 

1492 

1508 

1519 

1524 

1538 

1551 



1556 

1570 

1583 

1588 

1602 

1615 

1620 

1634 

1647 

1652 

1666 

1679 

1684 



1698 

1711 

1716 

1730 

1743 

1748 

1762 

1775 

1780 

1794 

1807 

1312 

1826 



1839 

1844 

1858 

1871 

1876 

1890 

1903 

1908 

1922 

1935 

1940 

1954 

1967 



1972 

1986 

1999 

2004 

2018 

2031 

2036 

2050 

2063 

2068 

2082 

2095 

2100 



2114 

2127 

2132 

2146 

2159 

2164 

2178 

2191 

21% 

2210 

2223 

2228 

2242 



2255 

2260 

2274 

2287 

2292 

2306 

2319 

2324 

2338 

2351 

2356 

2370 

2383 



2388 

2402 

2415 

2420 

2434 

2447 

2452 

2466 

2479 . 

2484 

24% 

2511 

2516 



2530 

2543 

2548 

2562 

2575 

2589 

2603 

2617 

2631 . 

2645 

2659 

2673 

2687 



2701 

2706 

2720 

2733 

2738 

2752 

2765 

2770 

2784 

2797 

2802 

2816 

2829 



2834 

2848 

2861 

2868 

2880 

2893 

2898 

2912 

2925 

2930 

2944 

2957 

2952 
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297b 

2989 

2994 

3008 

3021 



3117 


313b 

3148 

3151 

ERROR 1= 

104014 

552# 

3303 



ERRi 

00201b 

5b 1 

707# 




F OR*© 

00i u 42 

57b 

521# 




FORMOA 

OOlHbb 

525# 





GETRDY 

001 ISO 

507 

571# 

590 

510 

520 

GRCNT 

0024b 4 

810* 

812 




GT3IN 

002544 

831* 





GT31NP 

002S14 

840* 





GTROYA 

001210 

57b* 

58b 




GTR0Y8 

001214 

577* 





GTROYC 

001230 

578 

580# 




GTRDYO 

001252 

583 

595# 




GTROYX 

001 Ibb 

572* 

512 




HERE 

001440 

bib 

520# 




ICNT 

001030 

518# 

594* 

59b# 

527* 

ZT 

ru 

r- 

ICTR 

00 i 02b 

517* 

502* 

524* 



INBIN 

002510 

818# 





•(START 

091032 

519# 

571 




LOGIC 

001430 

bl9* 





NACHER 

00Q004 

438# 

557* 

572* 

998* 

1012* 

MAIN! = 

020000 

500* 

991 




MANUAL= 

100000 

4Bi* 





NOP = 

000240 

459# 

519 




NXTST 

001040 

522# 

571* 

585 

511 

521 

OACNV 

Q02Sb2 

592 

5% 

715 

719 

850# 

OACNVA 

002874 

854# 

853 




OACNVX 

002742 

850* 

854 

359* 

859* 

850* 

OPEN = 

000000 

4bQ* 

517 

518 

520 

521 



530 

531 

532 

533 

534 



735 

774 

783 

798 

805 



929 

855 

3295 



_* 

rw => 

4003007 

48b# 

518* 

3285* 



FIND 

002540 

827* 

942* 




POPSP = 

00572b 

487# 

793 

79b 



?0PSP2= 

Q22b2b 

488# 

504 

1002 

1015 

1030 

PRTYO = 

000000 

4%# 





PRTY1 = 

000040 

495# 





PRTY2 = 

000100 

494 i 





PRTY3 = 

000140 

493# 





PRTY4 = 

000200 

492# 

491# 





PRTY5 = 

000240 





PRTYb = 

000300 

490# 

514 




PRTY7 = 

000340 

449 

489# 

555 

573 


PRVCNT 

OOlObb 

533* 

3285* 

3300 



PSW = 

17777b 

457® 

Sbb* 

573* 

789* 


PTO 

002534 

825# 

831 

837* 



P T OP 

032542 

82 8# 

840 

845* 



PTl 

00253b 

82b# 

831* 

832* 

835* 

835* 

PUP 

002544 

829# 

840* 

841* 

844* 

845* 

POT IT 

003314 

559 

940# 




RCMSK 

002504 

811 

815# 




RCNT 

001044 

524# 





REGADR 

015544 

3253* 

3273* 

3283# 

3285 

3288* 

RIND 

002532 

818* 

820 

821 

824# 

833* 


L 
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RNCNT 

00250b 

313* 

815* 












RNDNMB 

001070 

534 « 

3287* 

801 

3289 

3292 










RNOEN 

002150 

■ 737i 

810 

3285 










RNIIM 

= 000002 

501* 

981 












RP1 

00221b 

737 

741* 

748 

750* 










RP2 

002220 

740 

744 

747* 

751# 










RSTPC 

001524 

550* 

558 

550* 











R5TPSH 

RSTREG 

001525 

551* 

557 

561* 











= 104013 

550* 

874 

899 











RSTRG 

001570 

559 

550* 












RTNNO 

001035 

=*000000 

521* 

582 

507 

522* 


715 








RO 

479* 

580* 

581* 

582 

515* 

530 

531* 

532* 

533* 

534* 

535* 

879* 



3287 

3288 












R1 

=*000001 

479* 

878* 

883* 

887* 

393* 

895* 








R2 

=*000002 

480* 

980* 

894* 

395 

897* 









R3 

=*000003 

481* 

881* 

891* 











RH 

=*000004 

482* 

982* 

985* 

998* 

989 









R5 

=*000005 

483* 

521* • 

525 

715* 

723* 

900* 

3291* 

3295* 

3299* 





RS 

=*000005 

484* 

574* 

593* 











R7 

=*000007 

485* 

575* 

529* 











SAVREG 

= 104012 

558* 

857 

877 











SAVRG 

001530 

557 

537* 












SCOPE 

= 104011 

555* 

975 

1000 

1003 

1014 

101? 

1028 

1031 

1042 

1045 

1055 

’059 

1072 



1077 

1091 

1104 

1109 

1123 

1135 

1141 

1155 

1152 

1173 

1187 

1200 

1205 



1219 

1232 

1237 

1251 

1254 

1259 

1283 

1295 

1301 

1315 

1328 

1451 

1333 

1347 



1350 

1355 

1379 

1392 

1397 

1411 

1424 

1429 

1443 

1455 

1475 

1488 



1493 

1507 

1520 

1525 

1539 

1552 

1557 

1571 

15P4 

1 49. 

1503 

i> 15 

1521 



1535 

1549 

1553 

1567 

1580 

1585 

1599 

1712 

1717 

i.?3i 

1744 

1/49 

1753 



1775 

1781 

1795 

1808 

1813 

1827 

1840 

1345 

1859 

1872 

1877 

1891 

1904 



1909 

1923 

1935 

1941 

1955 

1958 

1973 

198? 

2000 

20J5 

2019 

3032 

2037 



2051 

2054 

2059 

2083 

2095 

2101 

2115 

2128 

2133 

2147 

2150 

2155 

2179 



2192 

2197 

2211 

2224 

2229 

2243 

2255 

2251 

2275 

2289 

2293 

2307 

2320 



2325 

2339 

2352 

2357 

2371 

2384 

2389 

2403 

2415 

2421 

2435 

2448 

2453 



2457 

2490 

2495 

2499 

2512 

2517 

2531 

2544 

2549 

2S53 

2577 

2591 

2505 



2519 

2533 

2547 

2551 

2575 

2599 

2702 

2707 

2721 

2734 

2739 

2753 

2755 



2771 

2785 

2798 

2803 

2817 

2830 

2835 

2849 

2852 

2857 

2881 

2894 

2999 



2913 

2925 

2931 

2945 

2958 

2953 

2977 

2990 

2995 

3009 

3022 

3027 

3041 



3054 

3059 

3073 

3085 

3091 

3105 

3118 

3123 

3137 

3150 

3153 

3175 

3139 



3202 

3215 

3228 

3241 

3254 

3305 

3314 




SCOPTR 

001034 

520* 

592 

525* 











SETSR 

001575 

570 

575* 












SPBOT 

= 001000 

459* 

555 

574 











SR 

= 177570 

455* 

577 

580 

597 

500 

505 

509 

528* 

585 

711 

974 

985 


SRESET 

= 104010 

554* 

575 

1087 

1119 

1151 

1183 

1215 

1247 

1279 

1311 

1343 

1375 

1407 



1439 

1471 

1503 

1535 

1557 

1599 

1531 

1553 

1595 

1727 

2143 

1759 

1791 

1823 



1855 

1887 

1919 

1951 

1983 

2015 

2047 

2079 

2111 

2175 

2207 

2239 



2271 

2303 

2335 

2357 

2399 

2431 

2453 

iSlf 

2527 

2559 

2717 

2749 

2781 



2813 

2845 

2877 

2909 

2941 

2973 

3005 

3059 

3101 

3133 

3149 

3152 



3175 

3188 

3201 

3214 

3227 

3240 

3253 




SRSET 

001154 

570* 













SRSETT 

001550 

553 

570# 

872* 











stal 

002435 

541 

801* 












STALA 

002455 

804* 

805* 












STALB 

002450 

603 

807* 












STALL 

= 104002 
001130 

542* 













START 

505 

555* 
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STCllVs 

104006 

ssa# 





STLftSK 

002482 

302 

903# 




STPRA 

001848 

883* 

888# 




STTCV 

001830 

543 

883# 




ivRpi« B8illb 

33"’* 

538* 

845 
&44 . 

847# 

848# 



TCBft 

001012 

511# 

1041 

1580* 

1581 

1585* 



1832 

1844* 

1845 

1649* 

1650 



1708* 

1709 

1? 13* 

1714 

1726* 



1773 

1777* 

1778 

1790* 

1792' 



1841* 

1842 

1854* 

1856 

1868* 



1308 

1913* 

1920 

1932* 

1933 



1392* 

1984 

1998* 

199? 

2001* 



2048 

2814* 

2815 

2618* 

2629* 

TCCM 

001008 

509# 

981* 

988* 

999 

2698* 



2738 

2748* 

2750 

2762* 

2763 



2312* 

2314 

2828* 

282? 

2831* 



2378 

2890* 

2891 

2895* 

2396 



2854* 

2955 

2959* 

2960 

2972* 



3019 

3023* 

3024 

3036* 

3038 

TCDT 

001014 

512# 

1027 

1Q88* 

1069 

1073* 



1120 

1132* 

1133 

1137* 

1138 



1138* 

119? 

1201* 

1202 

1214* 



1281 

1285* 

1288 

i.?78* 

1280 



1329* 

1330 

1342* 

1344 

1356* 



1394 

1408* 

1408 

1420* 

1421 



1470* 

1472 

1484* 

1495 

1489* 



1538 

1548* 

1549 

1553* 

1554 



2800* 

2801 

2804* 

3263 


TCLVL 

001020 

514# 

887 




TOST 

001004 

503# 

982* 

987* 

1013 

3082* 



3120 

3132* 

3134 

3172 

3185 

TCVTR 

001018 

513# 

885 




TCUC 

001010 

510# 

1055 

2080* 

2061 

2065* 



2112 

2124* 

2125 

2129* 

2130 



2133* 

2199 

2193* 

2194 

2206* 



2253 

2257* 

2258 

2270* 

2272 



2321* 

2322 

2334* 

2336 

2348* 



2m 

2398* 

2400 

2412* 

2413 



2 482* 

2434 

2478* 

2477 

2481* 



2523 

2540* 

2541 

2545* 

2546 



2884* 

2835 

2888* 

3273 


T E.1P 

001072 

535 i 





TENPMR 

003058 

880 

901# 




TLAST = 

177777 

498 1 

3308 




TP3 

001024 

518# 

785* 




TPS 

001022 

515# 

788 




TRPV 

000034 

450# 





TYP 

002222 

C ">? 

753# 




TYPA 

002232 

758# 

784 

7 73 



TYPC 

002254 

757 

781# 




TYPD 

002272 

759 

733 

785# 

770 

772 

TYPOAT 

002338 

758* 

753* 

761 

765 

769* 

TYPE = 

104000 

536# 

588 

587 

613 

675 

TYPES = 

104001 

540# 

727 




TYPE 

002310 

782 

769# 





G06 


1586 

1598* 

1600 

1612* 

1613 

1617* 

1618 

1630* 

1662* 

1664 

1676* 

1677 

■1681* 

1682 

1694* 

1696 

1728 

1740* 

1741 

1745* 

1746 

1758* 

1760 

1772* 

183? 

1804* 

1805 

1809* 

1810 

1822* 

1324 

1836* 

1869 

1873* 

1874 

1886* 

1838 

1900* 

1901 

1905* 

1937* 

1938 

1950* 

1952 

1964* 

1965 

1969* 

1970 

2002 

2014* 

2016 

2023 * 

2029 

2033* 

2034 

2046* 

2629 

2632* 

2642* 

2643 

2646* 

3293 



2699 

2703* 

2704 

2716* 

2718 

273Q* 

2731 

2735* 

2767* 

2768 

2780* 

2782 

2794* 

2795 

2799* 

2800 

2832 

2944* 

2846 

28S8* 

2859 

2963* 

2864 

2876* 

2908* 

2910 

2922* 

2923 

2927* 

2928 

2940* 

2942 

2974 

2986* 

2987 

2991* 

2992 

3004* 

3006 

3019* 

3050* 

3051 

3055* 

3056 

3068* 

3070 

. 3146 

3159 

1074 

1096* 

1088 

1100* 

1101 

1105* 

1106 

1119* 

1150* 

1152 

1164* 

1165 

1169* 

1170 

1182* 

1184 

1216 

1228* 

1229 

1233* 

1234 

1246* 

1249 

1260* 

1292* 

1293 

1297* 

1298 

1310* 

1312 

1324* 

1325 

1357 

1361* 

1362 

1374* 

1440 

1376 

1388* 

1389 

1393* 

1425* 

1426 

1438* 

1452* 

1453 

1457* 

1459 

1490 

1502* 

1504 

1516* 

1517 

1521* 

1522 

1534* 

1566* 

1568 

2572* 

2573 

2576* 

2586* 

258? 

2590* 

3083 

3087* 

3088 

3100* 

3102 

3114* 

3115 

3119* 

3198 

3211 

3224 

323? 

3250 



2066 

2078* 

2080 

2092* 

2093 

2097* 

2098 

2110* 

2142* 

2144 

2156* 

2157 

2161* 

2162 

2174* 

2176 

2208 

2220 * 

2221 

2225* 

2226 

2238* 

2240 

2252* 

2284* 

2285 

2289* 

2290 

2302* 

2304 

2316# 

2317 

2349 

2353* 

2354 

2366* 

2368 

2380* 

2381 

2385* 

2417* 

2418 

2430* 

2432 

2444* 

2445 

2449* 

2450 

2482 

2494* 

2496 

2508* 

2509 

2513* 

2514 

2526* 

2558* 

2560 

2656* 

2657 

2660* 

2670* 

2671 

2674* 


77 1* 774# 

782 878 


TCI - 

TCI 1 7EST 1 

MACYil 

27(732) 

QZTCAA.Pll CROSS REFERENCE 

TABLE 

TYPG 

002322 

771# 


TYPS 

002340 

539 

775# 

TYPSA 

002354 

780 

782# 

TYPSB 

002355 

779* 

779 

TO 

003514 

519 

955# 

TQMSG 

00331*3 

943# 

979 

Ti 

003514 

955 

991# 

T1Q 

004125 

1080 

1093# 

7130 

010055 

1975 

1989# 

T 101 

010142 

1990 

2007# 

1 103 

010175 

2009 

2021# 

T1C3 

010252 

2022 

2039# 

T104 

010335 

2040 

2053# 

T1QS 

010352 

2054 

2071# 

7105 

010415 

2072 

2085# 

T1Q7 

010472 

209b 

2103# 

Til 

004202 

1094 

ini# 

TllQ 

010525 

2104 

2117# 

Till 

010502 

2119 

2135# 

T1I2 

010535 

2135 

2149# 

1113 

3i0“'l H 

2150 

2157# 

1114 

010745 

2159 

2181# 

TI 15 

01102’ 

2182 

2199# 

ti :s 

01 105 j 

2200 

22x3# 

» ^ • 

rjin 03 

will 

33- 4 

2231# 

T ? 

004235 

Iil2 

1125# 

7120 

011155 

2232 

2245# 

T121 

011242 

2245 

2253# 

7122 

011275 

2254 

2277# 

7123 

011352 

2279 

2295# 

7124 

011405 

2295 

2309# 

7125 

011452 

2310 

2327# 

7125 

0.11515 

c dco 

23418 

7127 

Cl 1572 

2342 

2359# 

713 

004312 

1125 

1143# 

7130 

011525 

2350 

2373# 

7131 

011702 

2374 

2391# 

7122 

011735 

2392 

2405# 

7133 

012012 

2405 

2423# 

7134 

012045 

2424 

2437# 

7135 

012122 

2433 

2455# 

7135 

012155 

2455 

2459# 

7137 

012232 

2470 

2487# 

714 

004345 

1144 

1157# 

7140 

012255 

24S8 

2501# 

7141 

012342 

2502 

2519# 

7142 

012375 

2520 

2533# 

7143 

012452 

2534 

2551# 

7144 

012505 

2552 

2555# 

7145 

012544 

2555 

2579# 

7145 

012502 

2580 

2593# 

7147 

012540 

2594 

2507# 

115 

004422 

1158 

1175# 

7150 

012575 

2508 

2521# 

7151 

012734 

2522 

2535# 

7152 

012772 

2635 

2549# 


L 


H06 
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794 

783# 


TCI - 

TCI 1 TEST 

1 

MACYli 

27(732) 

D2TCAA 

.Pll 

CROSS 

REFERENCE 

TABLE 

T153 

313030 


2550 

2553S 

i T.54 

0I3Qbb 


2554 


T155 

013124 


2573 

2591s 

T1S5 

013200 


2592 

2709 s 

7*57 

0i32j4 


2710 

2'23# 

Tit, 

0QH455 

013310 


1 17b 

1189s 

TISO 


2724 

2741s 

Tibi 

013344 


2742 

2755S 

; 7152 

013420 


2755 

H773» 

7153 

313454 


2774 

2737s 

TlbH 

013530 


2763 

2335 s 

Tlb5 

Oi3Sb4 


2305 

2319s 

| '155 

Ol3b4Q 


2320 

2837 a 

Tih7 

013574 


2333 

235* S 

1 T i 7 

304532 


1193 

1237s 

1 T173 

013750 


2352 

2859 s 

1 T’?l 

014004 


2370 

2333a 

. 7172 

OIHObO 


2384 

290 is 

| *r | 7 *q 

j *■ 

014114 


2932 

2915* 

| T17H 

0141^0 


2915 

2933a 

H7S 

014224 


2934 

29478 

7 17b 

314330 


2943 

2955s 

Ti77 

014334 


2955 

2979s 

72 

DQ3S4b 


992 

10051 

i T2C 

0045bb 


1203 

12218 

12J3 

014410 


2980 

2997s 

im 

014444 


2993 

3011s 

1202 

01^520 


3312 

3029 s 

'203 

014554 


3033 

3043 s 

'204 

014533 


3044 

30518 

1 T20S 

014554 


3052 

3075s 

| 7205 

014740 


3075 

3093s 

! '207 

014774 


3094 

3107s 

| T2i 

00464? 


1222 

1239 s 

t '210 

015050 


3103 

3125s 

i 7211 

015104 


3125 

3139 s 

| -PT £ 

015132 


3140 

3152* 

I '213 

. 015150 


3153 

3155® 

1 '214 

015205 


3155 

3173s 

1 7215 

o: 5234 


3179 

3191* 

T2IS 

015252 


3192 

3204# 

! 7217 

015310 


3205 

2217s 

; 722 

004675 


1240 

1253* 

! 7220 

015335 


3213 

3230s 

; 7221 

015354 


3231 

3243s 

1 7222 

015412 


324« 

3255* 

( 7223 

015434 


3257 

. 3255* 

i 7224 

015455 


3257 

3275* 

> 7225 

015572 


3277 

3307s 

1 723 

004752 


1254 

1271s 

* T24 . 

005005 


1272 

1285* 

i 725 

005052 


1285 

1304 

1303* 

72b 

005115 


1317# 

727 

005172 


1318 

1335# 

T3 

003700 


1005 

1019# 

▼bn 
1 > %#«# 

! 

i 

i 

! 

1 

005225 


1335 

1349# 
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TCI - TCI 1 TEST 1 MAC Vi 1 27(733) 

DZTCAA.Pli CROSS REFERENCE TABLE 


T31 

005302 

T32 

005336 

T33 

00541,2 

T34 

005445 

T35 

005522 

T36 

G05555 

T37 

005632 

T4 

003732 

T40 

005555 

T41 

305742 

T42 

005775 

T43 

006052 

T44 

005105 

T45 

005162 

T46 

006216 

T47 

006272 

T5 

003764 

ISO 

005325 

T51 

0054Q2 

T52 

006435 

T53 

006512 

754 

005545 

T55 

006622 

T56 

006656 

T57 

006732 

i 15 

004016 

T60 

006766 

75 1 

007042 

762 

007076 

T63 

007152 

T64 

007206 

T55 

007262 

766 

007316 

1 T67 

007372 

77 

009072 

T70 

007426 

771 

007502 

772 

007536 

773 

007612 

774 

007646 

T75 

007722 

T76 

007756 

T77 

010032 

X 

= 000225 


5 


! 


1350 1367# 

1369 13914 

1382 1399# 

1400 1413# 

1414 1431# 

1432 1445# 

1446 1463# 

1020 1033# 

1464 1477# 

1479 1495# 

1496 1509# 

1510 1527# 

1529 1541# 

1542 1559# 

1560 1573# 

1574 1591# 

1034 1047# 

1592 1605# 

1606 1623# 

1624 1637# 

1639 1655# 

1656 1669# 

1670 1697# 

1689 1701# 

1702 1719# 

1048 1061# 

1720 1733# 

1734 1751# 

1752 1765# 

1766 1783# 

1784 1797# 

1793 1915# 

1916 1929# 

1930 1947# 

1062 1079# 

1848 1861# 

1862 1879# 

1880 1893# 

1894 1911# 

1912 1925# 

1926 1943# 

1944 1957# 

1958 1975# 

499# 964 

1050 1065# 

1161# 1174 

1270 1275# 

1371# 1380 

1476 1481# 

1577# 1590 

1686 1691# 

1787# 17% 

1892 1897# 

1993# 2006 

2102 2107# 

2203# 2212 


08-SEP-76 09:06 PAGE 
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969# 

990 

995# 

1078 

1083# 

1092 

1179# 

1188 

1193# 

1284 

1289# 

1302 

1385# 

1398 

1403# 

1494 

1499# 

1508 

1595# 

1604 

1609# 

1700 

1705# 

1718 

1801# 

1814 

1819# 

1910 

1915# 

1924 

2011# 

2020 

2025# 

2116 

2121# 

2134 

2217# 

2230 

2235# 



J06 

75 


1004 

1009# 

1019 

1023# 

1032 

1037# 

1046 

1051# 

1097# 

1110 

1211# 

1115# 

1124 

1129# 

1142 

1147# 

1156 IS 

1206 

1220 

1225# 

1238 

1243# 

1252 

1257# 

1307# 

1316 

1321# 

1334 

1339# 

1348 

1353# 

1366 

1412 

1513# 

1417# 

1430 

1435# 

1444 

1449# 

1462 

1467# 

1526 

1531# 

1540 

1545# 

1558 

1563# 

1572 

1622 

1627# 

1636 

1641# 

1654 

1659# 

1668 

1673# 

1723# 

1732 

1737# 

1750 

1755# 

1764 

1769# 

1782 

1328 

1833# 

1846 

1851# 

1860 

1865# 

1878 

1883# 

1929# 

1942 

1947# 

1956 

1961# 

1974 

1979# 

1988 

2038 

2043# 

2052 

2057# 

2070 

2075# 

2084 

2089# 

2139# 

2148 

2153# 

2166 

2171# 

2180 

2185# 

2198 

2244 

2249# 

2262 

2267# 

2276 

2281# 

2294 

2299# 


K06 
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DZTCAA.P11 CROSS REFERENCE TA9LE ~ USER SYMBOLS 


, 


2308 

2313# 

2326 

2331# 

2340 

2345# 

2358 

2363# 

2372 

2377# 

2390 

2395# 

2404 

’ 


2409# 

2422 

2427# 

2436 

2441# 

2454 

2459# 

2468 

2473# 

2486 

2491# 

2500 

2505# 

■: 


2518 

25c?3# 

2532 

2537# 

2550 

2555# 

2564 

2569# 

2578 

2583# 

2592 

2597# 

2606 

1 


2611* 

2620 

2625# 

2634 

2639# 

2648 

2653# 

2662 

2667# 

2676 

2681# 

2690 

2695# 

1 


2708 

2713# 

2722 

2727# 

2740 

2745# 

2754 

2759# 

2772 

2777# 

2786 

2791# 

2804 

f 


2809* 

2818 

2823# 

2836 

2841# 

2850 

2855# 

2868 

2873# 

2692 

2887# 

2900 

2905# 

j 


2914 

2919# 

2932 

2937# 

2946 

2951# 

2964 

2969# 

2978 

2983# 

2996 

3001# 

3010 

1 


3015# 

3028 

3033# 

3042 

3047# 

3060 

3065# 

3074 

3079# 

3092 

3097# 

3106 

3111# 

| 


3124 

3129# 

3138 

3143# 

3151 

3156# 

3164 

3169# 

3177 

3182# 

3190 

3195# 

3203 

{ 


3208# 

3216 

3221# 

3229 

3234# 

3242 

3247# 

3255 

3260# 

3265 

3270# 

3275 

3280# 



3306 

3311# 











1 XAR 

00352H 

968 

974# 












XAB 

003536 

975 

978# 












XAC 

003544 

981# 

989 












XAD 

003S64 

984# 

986 












ZZZfl 

015602 

3310 

3314# 












* 

= 01 5604 

435# 

436 

438 

440 

442 

444 

446 

450 

453 

504# 

506# 

767 

834 

1 


943 

1070 

1075 

1102 

1107 

1134 

1139 

1166 

1171 

1198 

1203 

1230 

1235 

1 


1262 

1267 

1294 

1299 

1326 

1331 

1358 

1363 

1390 

1395 

1422 

1427 

1454 



1459 

1486 

1491 

1518 

1523 

1550 

1555 

1582 

1587 

1614 

1619 

1646 

1651 

s 


1678 

1683 

1710 

1715 

1742 

1747 

1774 

1779 

1806 

1811 

1838 

1843 

1870 

1 


1875 

1902 

1907 

1934 

1939 

1966 

1971 

1998 

2003 

2030 

2035 

2062 

2067 

1 


2094 

2099 

2126 

2131 

2158 

2163 

2190 

2195 

2222 

2227 

2254 

2259 

2286 

1 


2291 

2318 

2323 

2350 

2355 

2382 

2387 

2414 

2419 

2446 

2451 

2478 

2483 

1 


2510 

2515 

2542 

2547 

2700 

2705 

2732 

2737 

2764 

2769 

2796 

2801 

2828 

1 

1 


2833 

2860 

2865 

2892 

2897 

2924 

2929 

2956 

2961 

2988 

2993 

3020 

3025 

1 


3052 

3057 

3084 

3089 

3116 

3121 

3147 

3160 

3173 

3186 

3199 

3212 

3225 

j 


3238 

3251 











! 
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DZTCAA.Pil CROSS REFERENCE TABLE — MACRO NAMES 


EMTDEF 

435* 

537 

539 

541 

543 

545 

547 

549 

551 

553 

555 

557 

559 

561 

563 

TSTA 

433* 

954 

990 

1004 

1018 

1032 

1046 

1060 

1078 

1092 

1110 

1124 

1142 

1156 

1174 


1183 

1205 

1220 

1233 

1252 

1270 

1284 

1302 

1316 

1334 

1348 

1366 

1380 

1393 

1412 


1430 

1444 

1452 

1475 

1494 

1508 

1526 

1540 

1558 

1572 

1590 

1604 

1622 

1636 

1654 


1668 

1585 

1700 

1718 

1732 

1750 

1764 

1782 

1796 

1814 

1828 

1946 

i860 

1378 

1892 


1910 

1924 

1942 

1955 

1974 

1988 

2006 

2020 

2038 

2052 

2070 

2084 

2102 

2116 

2134 


2148 

2155 

2180 

2196 

2212 

2230 

2244 

2262 

2276 

2294 

2308 

2326 

2340 

2358 

2372 


2390 

24Q4 

2422 

2435 

2454 

2468 

2486 

2500 

2518 

2532 

2550 

2564 

2578 

2592 

2606 


2520 

2534 

2548 

2652 

2676 

2690 

2708 

2722 

2740 

2754 

2772 

2786 

2804 

2818 

2836 


2850 

2858 

2882 

2900 

2914 

2932 

2946 

2964 

" 2978 

2996 

3010 

3028 

3042 

3060 

* 3074 


3092 

3305 

435* 

3105 

3124 

3138 

3151 

3164 

3177 

3190 

3203 

3216 

3229 

3242 

3255 

3265 

•3275 

TSTBR 

3151 

3154 

3177 

3190 

3203 

3216 

3229 

3242 







TSTBRS 

435# 

3138 














TSTBRU 

433* 

1050 

1092 

1124 

1156 

1188 

1220 

1252 

1284 

1316 

1348 

1380 

1412 

1444 

1476 


1508 

1540 

1572 

1604 

1636 

1668 

1700 

1732 

1764 

1796 

1828 

1860 

1892 

1924 

1956 


1988 

2020 

2052 

2084 

2116 

2148 

2180 

2212 

2244 

2276 

2308 

2340 

2372 

2404 

2436 


2458 

2500 

2532 

2690 

2722 

2754 

2786 

2818 

2850 

2882 

2914 

2946 

2978 

3010 

3042 


3074 

3105 













TSTREF 

433# 

990 

1004 

1018 

1032 

1046 










TSTRES 

435# 

1078 

1110 

1142 

1174 

1206 

1238 

1270 

1302 

1334 

1366 

1398 

1430 

1462 

1494 


1525 

1558 

1590 

1622 

1654 

1686 

1718 

1750 

1782 

1814 

1846 

1878 

1910 

1942 

1974 


2005 

2038 

2070 

2102 

2134 

2166 

2198 

2230 

2262 

2294 

2326 

2358 

2390 

2422 

2454 


2485 

25ie 

2550 

2708 

2740 

2772 

2804 

2836 

2868 

2900 

2932 

2964 

2996 

3028 

3060 


3092 

3124 












TSTST 

433# 

2554 

2578 

2592 

2606 

2620 

2634 

2648 

2662 

2676 
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D2TCAft.Pl! CROSS REFERENCE TABLE ~ PERMANENT SYMBOLS 


MOB 


ADD 

ASL 


664 

633 


? 32 


740 


BCS 

384 



otu 

598 

506 

616 


1203 

1217 

1235 


1441 

1459 

1473 


1683 

1697 

1715 


1921. 

1939 

1953 


2163 

2177 

2195 


2401 

2419 

2433 


2630 

2644. 

2658 


2865 

2879 

2897 


3103 

3121 

3135 

BIC 

581 

802 

91 1 


1329 

1361 

1393 


1809 

1841 

1873 


2289 

2321 

2353 

BIS 

paqc; 

2Q?7 

2959 

1068 

1086 

1100 


1310 

1324 

1342 


1548 

1566 

1580 


1790 

1804 

1822 


2028 

2046 

2060 


2270 

3pQi| 

la.ii>y * 

2302 


2508 

2526 

2540 


2876 

2890 

2908 


3114 

■ 3132 


BIT 

b/ t 

597 

6U0 


1152 

1165 

1170 


1312 

1325 

1330 


1472 

1485 

1490 


1632 

1645' 

1650 


1792 

1805 

1810 


1952 

1965 

1970 


2112 

2125 

2130 


2272 

2285 

2290 


2432 

2445 

2450 


2718 

2731 

2736 


2878 

2891' 

2896 


3038 

3051 

3056 


3c 1 1 

3224 

3237 

BLOS 

986 



BNE 

678 

583 

586 


863 

873 

892 


13 30 

1422 

1454 


1870 

1902 

1934 


2360 

2382 

2414 


2956 

2988 

3020 

BPL 

686 

767 


BR 

590 

620 

706 

CLR 

705 

789 

882 

CMP 

585 

611 

690 

CMPB 

582 

761 


COM 

596 

671 

832 

DEC 

602 

791 

794 

EMT 

538 

540 

542 


744 

754 

777 

787 

691 

762 

803 

812 

1249 

1267 

1281 

1299 

x49i 

1505 

1523 

1537 

1729 

1747 

1761 

1779 

1971 

1985 

2003 

2017 

2209 

2227 

2241 

2259 

2451 

2465 

2483 

2497 

2672 

2686 

2705 

2719 

2911 

2929 

3173 

2943 

2961 

3160 

3186 

3199 

836 

845 

855 

958 

1425 

1457 

1489 

1521 

1905 

1937 

1969 

2001 

2385 

2417 

2449 

2481 

3QQ1 

It* J * 

3023 

3055 

3m 7 

1118 

1132 

1150 

1164 

1356 

1374 

1388 

1406 

1598 

iolc 

1630 

1644 

1836 

1854 

1%8 

1886 

2078 

2092. 

2110 

2124 

2316 

2334 

2348 

2366 

2558 

2698 

2716 

2730 

2922 

2940 

2954 

2972 

605 

609 

71 1 

974 

1184 

1197 

1202 

1216 

1344 

1504 

1357 

1362 

1376 

1517 

1522 

1536 

1664 

1677 

1682 

1696 

1824 

1837 

1842 

1856 

1984 

1997 

2002 

2016 

2144 

2157 

2162 

2176 

2304 

?917 

2322 

2336 

2464 

£ 7 

, 2482 

2496 

2750 

2763 

2768 

2782 

2910 

2923 

2928 

2942 

3070 

3083 

3088 

3102 

3250 




595 

601 

603 

610 

898 

975 

1070 

.1102 

1486 

1518 

1550 

1582 

1966 

1998 

2030 

2062 

2446 

2478 

2510 

2542 

3052 

3084 

3116 

3147 

764 

773 

784 

886 

983 

987 

2576 

2550 

779 

985 

2573 

2587 

833 

841 

842 


862 

872 

891 

897 

544 

546 

548 

550 


853 

856 

887 

B88 

1075 

1089 

1107 

1121 

1313 

1331 

1345 

1363 

1555 

1569 

1587 

1601 

1793 

1811 

1825 

1843 

2035 

2049 

2067 

2081 

2273 

2291 

2305 

2323 

2515 

2529 

2547 

2561 

2737 

2751 

2769 

2783 

2975 

2993 

3007 

3025 

3212 

3225 

3238 

3251 

1073 

1105 

1137 

1169 

1553 

1585 

1617 

1649 

2033 

2065 

2097 

2129 

2513 

2545 

2703 

2735 

3119 

1182 

1196 

1214 

1228 

1420 

1438 

1452 

1470 

! C.C -> 

1S 7 6 

1694 

1708 

1900 

1918 

,932 

1950 

8142 

2156 

2174 

2188 

2380 

2398 

2412 

2430 

2748 

2762 

2780 

2794 

2986 

3004 

3018 

3036 

1069 

1074 

1088 

1101 

1229 

1234 

1248 

1261 

1389 

1394 

1408 

1421 

1549 

1554 

1568 . 

1581 

1709 

1714 

1728 

1741 

1869 

1874 

1888 

1901 

2029 

2034 

2048 

2061 

2189 

2194 

2208 

2221 

2349 

2354 

2368 

2381 

2509 

2514 

2528 

2541 

2795 

2800 

2914 

2827 

2955 

2960 

2974 

2987 

3115 

3120 

3134 

3146 

612 

712 

757 

780 

1134 

1166 

1198 

1230 

1614 

1646 

1678 

1710 

2094 

2126 

2158 

2190 

2700 

2732 

2764 

2796 

989 

260 1 ' 

2618 

2632 

2646 

2601 

2615 

2629 

2643 

552 

554 

556 

558 


895 


1139 

1153 

1171 

1185 

1377 

1395 

1409 

1427 

1619 

1633 

1651 

1665 

1857 

1875 

1889 

1907 

2099 

2113 

2131 

2145 

2337 

2355 

2369 

2387 

2574 

2588 

2602 

2616 

2801 

2815 

2833 

2847 

3 n 39 

3057 

3071 

3099 

3290 




1201 

1233 

1265 

1297 

1681 

1713 

1745 

1777 

2161 

2193 

2225 

2257 

2767 

2799 

2831 

2863 

1246 

1260 

1278 

1292 

1484 

1502 

1516 

1534 

1726 

1740 

1758 

1772 

1964 

1982 

1996 

2014 

2206 

2220 

2238 

2252 

2444 

2462 

2476 

2494 

2812 

2826 

2844 

2858 

3050 

3068 

3082 

3100 

1106 

1120 

1133 

1138 

1266 

1280 

1293 

1298 

1426 

1440 

1453 

1458 

1586 

1600 

1613 

1618 

1746 

1760 

1773 

1778 

1906 

1920 

1933 

1938 

2066 

2080 

2093 

2098 

2226 

2240 

2253 

2258 

2386 

2400 

2413 

2418 

2546 

2560 

2699 

2704 

2832 

2846 

2859 

2864 

2992 

3006 

3019 

3024 

3159 

3172 

3185 

3198 

792 

795 

834 

843 

1262 

1294 

1326 

1358 

1742 

1774 

1806 

1838 

2222 

2254 

2286 

2318 

2828 

2860 

2892 

2924 


2660 

2674 

2688 


2657 

2671 

2685 

3289 

560 

562 

564 



TCI - 

Oil TEST 

1 

MAC' 11 

27(732) 

C8-SEP- 

•7b 09:06 

PAGI 

DZTCftP. 

,P1I 

CROSS REFERENCE 

TABLE - 

- PERMANENT SYMBOLS 

HALT 

437 

439 

<41 

4 L4 3 

445 

44? 

451 

INC 

594 

835 

344 

885 

994 



JMP 

505 

SO? 

579 

584 

3284 

3274 


1 JSR 

570 

578 

818 

692 

896 

715 

• 719 


3205 

329i 

3295 

3299 




! MOV 

5::5 

588 

58? 

571 

572 

573 

5?4 

1 

523 

524 

825 

626 

627 

628 

630 


542 

843 

844 

645 

650 

651 

652 

1 

555 

88? 

870 

672 

680 

703 

704 


748 

753 

755 

776 

778 

786 

854 

? 88 

j 

845 

84? 

850 

851 

852 

968 

{ 

981 

982 

988 

998 

1012 

1026 

1040 

I 

2570 

2884 

3283 

3273 

3283 

3285 

3287 

MOVE 

755 

758 

785 

769 

77 1 

857 

871 

RESET 

51? 

873 






rol 

738 

739 

742 

743 

745 

746 


1 ROR 

859 

880 

881 





1 RTI 

599 

848 

859 

668 

674 

683 

688 

I RTS 

829 

835 

878 

749 

768 

914 

823 

i SUB 

881 

714 

883 





J TST 

885 

890 

999 

10 1 3 

1027 

1041 

1055 

TSTB 

788 







.ABS 

491 







.ASCII 

°J9 

910 

912 

917 

920 

903 

940 

.ASCIZ 

■115 

92? 

929 

935 

939 

943 

95? 

.BYTE 

905 

938 






.END 

3315 







.EVEN 

982 







.LIST 

1 

429 

453 

538 

540 

542 

544 


582 

58 4 

989 

995 

1009 

1023 

1037 

- 

1179 

1193 

1211 

1205 

1243 

125? 

1275 


1417 

1435 

1449 

14b 7 

1481 

1499 

1513 


1839 

1873 

1891 

1705 

1723 

1737 

1755 


1897 

1915 

1929 

1947 

1961 

1979 

1993 


2139 

2153 

2171 

2409 

2185 

2203 

2217 

2235 


237? 

2395 

2427 

2441 

2459 

2473 


2811 

|||| 

M 

?£53 

286? 

2681 

2919 

2695 


2841 


2887 

2905 

293? 


3079 

3097 

3111 

3129 

3143 

3156 

3169 


3280 

3311 






.MACR 

433 

435 






.NLIST 

1 

430 

453 

538 

540 

542 

544 


582 

584 

989 

995 

1009 

1023 

1037 

i 1 

1179 

1193 

1211 

1225 

1243 

1257 

1275 

s 

1 417 

1435 

1449 

1467 

1481 

1499 

1513 

. 

1 

1859 

1873 

1691 

1705 

1723 

1737 

1755 


1897 

1915 

1929 

1947 

1961 

1979 

1993 

J 

2139 

2153 

2171 

2409 

2185 

2203 

2217 

2235 

! 

237? 

2395 

242? 

2441 

2459 

2473 

f 

2811 

2825 

2839 

2653 

2867 

2881 

2895 


2841 

2855 

2873 

288? 

2905 

2919 

2937 


3079 

3097 

3111 

3129 

3143 

3158 

3189 


3280 

3311 






.REM 

1 







.REPT 

453 







.TITLE 

1 








N06 


453 508 582 68? 


723 

759 

763 

770 

772 

801 

810 

819 

580 

591 

592 

593 

607 

615 

621 

622 

631 

832 

634 

637 

638 

639 

640 

641 

653 

654 

655 

656 

657 

658 

663 

665 

1*07 

708 

709 

710 

713 

7 37 

741 

747 

790 

804 

813 

818 

831 

837 

838 

840 

869 

870 

878 

879 

8 80 

881 

993 

994 

1054 

2572 

2588 

2600 

2814 

2628 

2642 

2656 


3288 

889 895 


702 733 750 781 797 80? 

939 848 854 875 900 


948 


546 

548 

550 

bb2 

554 

556 

558 

560 

1051 

1065 

1083 

109? 

1115 

1129 

114? 

1161 

1299 

1307 

1321 

1339 

1353 

1371 

1385 

1403 

1531 

1545 

1563 

1577 

1595 

1609 

1851* 

162? 

1641 

1769 

178? 

1801 

1819 

1833 

1865 

1883 

2011 

2025 

2043 

205? 

2075 

2089 

210? 

2121 

2249 

2267 

2281 

2299 

2313 

2331 

2345 

2363 

2491 

2505 

2523 

253? 

2555 

2569 

2583 

259"’ 

2713 

272? 

2745 

2759 

2777 

3015 

2791 

2809 

2823 

2951 

2969 

2983 

3001 

3Q33 

304? 

3065 

3182 

3195 

3208 

3221 

3234 

324? 

3260 

3270 

546 

548 

550 

552 

554 

556 

558 

560 

1051 

1065 

1083 

1097 

1115 

1129 

114? 

1161 

1289 

130? 

1321 

1339 

1353 

1371 

1385 

1403 

1531 

1545 

1563 

1577 

1595 

1609 

162? 

1641 

1769 

178? 

1801 

1819 

1833 

1851 

1865 

1883 

2011 

2025 

2043 

2057 

2075 

2089 

210? 

2121 

2249 

2267 

2281 

2299 

2313 

2331 

2345 

£363 

2491 

2505 

2523 

2537 

2555 

2569 

2583 

2597 

2713 

2727 

2745 

2759 

2777 

2791 

2809 

2023 

2951 

2969 

2983 

3001 

3015 

3033 

304? 

3065 

3182 

3195 

3208 

3221 

3234 

3247 

3260 

3270 






